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RANDOM I/O 
by Don Gottwaid 

Ralph went on vacation - so yours truly is responsible for this issue. Please don't judge 
too harshly ~ it's my first attempt at the whole issue. 

News from Exidy: Exidy Systems Inc. is a wholly owned subsidiary of Biotech Capital 
Investments. Paul Terrell has left Exidy Systems Inc. and sofar noone has been named to 
succeed him as President. It is a distinct possibility that Exidy Systems Inc. will shift its 
corporate headquarters and manufacturing facilities to the Dallas, Texas area. Watch for 
announcements of new generation products from them in the near future, 

M/T Microsystems Pascal will work in a 56K Exidy Sorcerer. To get 56K of memory you 
now have a choice of either a RAMPAC from W eston Miceotechnology in Ireland or perform 
the modification by Ed Mentzer (see SA Voi, 3* No, 6, page 108). The Exidy AUTOBOOT 
PAC has the new static memory chips, which are pin for pin compatible with the 2716 
EPROM. The PAC contains 6K oi RAM ad 2K of ROM for the 'autoboot 1 function, Weston's 
RAMPAC requires only the addition of one wire in order for it to function, 

F. C. Creed of RR #1, Hubbards, N.S., Canada, B0] 1TO has a problem with the WP PAC. 
For the first hour of operation it misbehaves, sometimes locking up the computer and at 
other times it fills the screen with garbage. Any ideas from anyone? He would also like to 
know how he can use his Development PAC with the Micropolis Disk System. He can save 
Source code on disk, but not Object code. If anyone can help - please write to him or, 
better yet, write an article for everyones benefit. 

Jack MacGrath issues this warning to people not too familiar with electronics: Know 
how the system works - be familiar with electronic troubleshooting methods - use fine 
hand tools such as a low wattage soldering pencil, solder sucker etc. - know how to read 
schematics and be very careful — one dip and -— presto -- a large repair bill and 
aggravation for the experienced technician. 

Dr. Douglas Matheson of the College of the Pacific, Stockton, California 95211 would 
like to find Sorcerer owners in his area. He is also a ham radio operator (WA6WRR) and 
would like to communicate with other hams who own Sorcerers. Where can he purchase a 
Disk System with CP/M for a reasonable price? His department is on a limited budget. If 
anyone canhelp - please let him know. Also, how can he make his NEC5 5 3G printer print 
bi-directionally? He has literally hundreds of questions - with noone to turn to. (NOTE: 
We are quite willing and able to provide our readers with the answers to their questions - 
BUT if you don't write in with specific questions - we won't know about your problems and 
consequently won't be able to help you. So let's hear from you. We will answer most 
questions through the newsletter - some may be referred to experts in the field who may 
answer you individually. ED). 


continued on page 16 





















THE OFFICE SORCERER 

by Roger Hagan, Business Editor 

Here is my technique for getting a Basic listing edited in the Word Processor back into 
Microsoft Basic or EXBASIC. The addresses for Exidy EXBASIC are higher because it is 
larger. The file in the Word Processor must begin with "GO 100" and conclude with: 

DEF USR0 = &HE003 
? USR(O) 

SE 1= K 

(in EXBASIC "BYE" replaces these two lines) then saved to disk as a Word Processor disk 
file. First, though, carriage returns at the ends of lines which are not really the ends of 
Basic lines must be removed, and a space must be added at the end of PRINT lines which 
wrap around to the head of the continuing next line. 

Then load MBASIC/EXBASIC, and get back to the Exidy monitor.I get back to CP/M 
from MBASIC with SYSTEM and then type M:, because I modified my CP/M to give me a 
jump to monitor when an invalid disk drive is called. From EXBASIC just type BYE. In 
monitor, preserve the first two pages of Basic by MOving 100 2FF 5B00, or for EXBASIC, 
6600. Re-enter CP/M and use PUT.COM (available from the Apprentice BBS or CPMUG 
disk 15) to PUT Prognam.WPF at 5D00 X (for non-auto execute). With EXBASIC, make 
it 6A00 X. Then bring in BASWR.COM, which is listed below, with the command MBASWR 
or EXBASWR. It leaves you in the monitor. Now use SE I=AE. The carriage return starts 
execution. The program whizzes into BASIC, and error messages may fly by. Try to note 
where they are for troubleshooting. The keyboard is locked out until you end up in 
monitor. 

BASWR, when executed, moves itself to the CP/M default buffer at 80H, then moves the 
two pages of Basic previously protected from the smashing of PUT, back into their home at 
100-2FF. At AE in the default buffer is the "read file" routine which makes each 
character of the ASCII file at 5D00 (6A00 for EXBASIC) avail able to Basic as if typed in 
via your having changed the monitor’s input vector. At the end of the listing it reads 
commands which send MBASIC back to the monitor (MBASIC, unlike EXBASIC, has no 
’BYE 1 command), where the final SE I=K is read, returning control to the keyboard. The 
ASCII file from your Word Processor must be ’PUT' way above the top of Basic because the 
Basic program it builds will gradually overtake it. The starting point may be lowered to 
suit the length of your program. The address change must be reflected in bytes 128-129 
of BASWR.COM, which is given here for MBASIC: 

100: 21 OE 01 11 AO 00 01 1C 00 ED BO C3 AO 00 21 00 

110: 5B 11 00 01 01 00 02 ED B0 C3 03 E0 E5 2A BA 00 

120: 7E 23 22 BA 00 B7 El C9 00 5D 

The EXBASIC version should have 66 at 110 and 6A at 129. 

Roger Hagan Associates 

109 Belmont Place, Seattle, WA 98102 Tel. (206)394-5034 


******************************* 

CASSETTE ASIRCNCMY PROGRAMS BCR EXIDY SORCERER 

MARS - (#10) Distance and angular diam. of Mars for any date; date and 
details of next opposition following any date. 

MVEN - (#10) Phase, distance and angular diam. of Mercury and Venus for 
any date and next elongation after any date. 

MERVE - (#10) Graphical display of Mercury and Venus relative to Sun for 

series of time intervals; distances, etc. for any date. 

PRISE - (#10) Risings or settings of Mercury and Venus before or after 
the Sun for any location and date. 

RISES - (#10) Times of rising, transit, and settings for any planet, 
Sun, or Moon for any location and date. 

SSTAR - (#20) Dates, radiants, etc. of annual meteor showers and 
graphical display for s el ec ted month. 

SASE for details on these and other astro programs to: 

Eric Burgess. F.R.A.S. 

13361 Frati Lane, Sebastopol, CA 95472 
(Overseas add #2.00 for Airmail, each order) 

******************************* 


<<< CLASSIFIED ADS >>> 


I am interested in used equip- ***** 
ment for the Sorcerer and also ***** 
a Sorcerer Model II. Must be ***** 
convertible to 220 VAC, 50H£. ***** 

Please send information and 
price (if possible including 
shipping by surface) to: 

Knut Nilaen, Box 2 Hovseter, 

Oslo 7, Norway 


***** 

***** 

***** 

***** 


GCMPLETE SYSTEM — 48K 
Sorcerer, S-100 Unit, 630K 
Micropolis dual disk system, 
9" Sanyo monitor, dual cass¬ 
ette system, BASIC, W/P. and 
Development PACs. plus lots 
of software. Call: Roger 
Gough at 201-549-8600 days, 
201-544-0977 nights/weekends 


* 


♦ * 
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STRINGY FLOPPY FOR THE 
SORCERER 

Review by Ian Duddy 

ASP MICROCOMPUTERS’ im - 
plementation of EXATRON'S ( ) 

STRINGY FLOPPY DRIVE has \—' 
been in almost continuous 
operation on the eight Sorcerers 
used in the Geology Department, 
University of Melbourne (Aus¬ 
tralia), tor the last six months. 

The Sorcerers are used mainly for 
word processing and also for data 
collection and manipul ation. The 
Stringy Floppy (SF) has been 
nothing short of remarkable in 
both operation and convenience 
when compared with both cassette 
and disk systems, and cannot be 
beaten at the price. 

The standard ASP system 
consists of the following: 

1. The ASP controller unit, 
housed in a small plastic case, 
comes with its own plug pack 
power supply and provisions for 
two drive units. The controller 
plugs into the 50 pin S100 socket. 

2. An EXATRON STRINGY 
FLOPPY DRIVE. 


3. Two new monitor ROMS 
implement new SF co mmands and 
as a bonus correct all known 
Sorcerer monitor bugs. (The new 
monitor is 10 bytes larger than 
the original and as such some 
existing user programs may 
require modifications that are 
outlined in the users manual). 

4. 10 blank SF wafers. 

5. A wafer containing data I/O 
programs for 8, 16, 32 and 48 K 
machines, a test program and a 
comprehensive memory test pro¬ 
gram to replace the standard 
routine. 



6. A comprehensive user manual. 

Data is recorded digitally on 
endless loop wafers at approx¬ 
imately 900 0 baud ! - that’s 

right, about 8 times faster than 
the fast cassette operation and 
infinitely more reliable. What’s 
more, the read/write operations 
are completely under computer 
control which means no hassles 
like those with the cassette volume 
and tone controls. Up to 127 
sequential files may be stored on 
thewafers which range in capacity 
from 5 to 75 Kbytes (5 to 75 feet). 

If the SF is plugged in, I/O is 
automatically set to the SF 
drives. I/O is changed between SF 
and cassette by issuing the new 
monitor commands: SE M = C 

(cassette) and SE M = S (stringy 
floppy). Other SE commands are 
rationalized and a new command, 

CE, has been implemented to 
certify wafers (erase and measure 
their length). 

When writing Monitor or Basic ^ 

files the SF automatically writes ( j 
and confirms the files by making 
two passes of the loop without 


ent’d on page 23 


2 

















THE HIGH COST OF HIGH SPEED 


Until recently, to realise the power of 
the Sorcerer you required an S100 
Expansion Unit plus floppy disk drive and 
controller. Now Exidy's direct plug-in 
drive provides a less expensive 
alternative. But the investment is still 
significant, and who wants only ONE 
d rive! 

There had to be a cheaper method of high 
speed storage. 


STHMIfY FLOPPY 





ERER 


So as the Australian Distributor for the 
various versions of the Exatron Stringy 
Floppy, we decided to design a special 
version for the Sorcerer. 

STRINGY FLOPPY 

STRINGY FLOPPY is a high speed digital 
tape transport system for storing programs 
and data entirely under the control of the 
computer. There are no controls to 
adjust, just one light indicating the 
drive is in operation and another 
indicating that data is being written onto 
wafer. Drives are individually packaged 
and connected to the Controller via a 
narrow ribbon cable. 

WAFERS - NOT CASSETTES 

STRINGY FLOPPY stores data on specially 
designed “Wafers" about the size of a 
credit card and 5mm. thick. These contain 
an endless loop of special chromium 
dioxide tape ranging in length from 1.6 to 
23 metres. Their low mass means they 
operate reliably at high speed. 

Removal of a reflective label protects 
them against accidental overwriting of 
data. 

The special tape and true digital 
recording technique (like floppy disks) 
means reliability, 
not use fluctuating audio tone 
cassettes. 

LOW MAINTENANCE DRIVE UNIT 

The STRINGY FLOPPY Wafer has 
the pressure roller for 
the capstan built in. 

So the capstan and 
the record head 
are fixed in the 
die-cast aluminium 
d rive. 

No adjustments required. 

The Wafer just slides into the 
Drive and “clicks" home. 

No other mechanical motion is required. 
And because Wafers contain endless loops, 
the tape always travels in the same 
direction. 

There is no need for rewind capability. 
Standard speed is 25 cm/second, and fast 
forward (?S% faster) is implemented where 
appropriate to speed throughput. 


Power to the Controller is provided by a 
plug pack. STRINGY FLOPPY Drives draw 
their power from the Controller. In 
operation the Controller turns off the 
Sorcerer's random access memory between 
46 k and 48K to accomodate a 2K read only 
memory (ROM) in the Controller. This ROM 
contains firmware routines to integrate 
the Sorcerer to the STRINGY FLOPPY. 

MONITOR 

Also included with STRINGY FLOPPY are two 
further ROMs to replace the Monitor 
program in the Sorcerer. Known bugs in 
the Monitor are corrected and routines 
included to allow computer input/output to 
be directed to tape or STRINGY FLOPPY 
using the SET Command. If STRINGY FLOPPY 
is plugged in at power up I/O is set 
initially to STRINGY FLOPPY. Others sell 
Monitors without the original bugs for 
around $100. Ours is included in the 
price of STRINGY FLOPPY. 


MONITOR/BASIC 

STRINGY FLOPPY may be used from either the 
Monitor or Basic. Wafers may be 
certified, programs saved or loaded. Up 
to 127 files may be stored on a Wafer 
(subject to capacity). 


STRINGY FLOPPY. This takes only a few 
seconds. The patch program is $A50. 
Remember to order it if you use the Pac 
with your Sorcerer. 


PRICE 

To be honest it couldn't be done for the 
price of the Tandy version. After all you 
get a replacement Monitor correcting known 
bugs, implementation of the fast forward 
capability of the Drive, a Data I/O 
capability, comprehensive Memory Test, . 
higher data density, AND a separate 
Controller design allowing low cost 
addition of a second Drive. So although 
the initial cost may be higher, the cost 
of a two Drive system Is substantially 
1owe r. ; > 

Including an initial supply of .5 Wafers 
STRINGY FLOPPY for the SorCeVer is $A339 
(Australian Dollars). And the extra Drive 
is $A157- If you order as a two Drive 
system at $A496 we'll include an extra 5 
Wafers on us. Add $A10 for surface mail 
from Australia to the USA, or $A39 for 
airmail (both including insurance).' Extra 
Wafers are available within the USA from 
Exatron Inc. . 

If you need more detailed information. 
Manuals are available separately for $A20 
including air mail postage. 

A 6 month limited warranty applies to 
Drive and Controller. 

All prices are Australian Dollars, and 
Bank Drafts must be in Australian 
Dol1ars. 

Orders may also be placed on your 
VISA or MASTERCHARlit Lard by forwarding 
signed order quoting full name, address, 
Card Number, and Expiry Date. 

ASP MICROCOMPUTERS 

ASP is an electronic distributor and 
design company based in a suburb of 
Melbourne in beautiful Australia. Having 
experienced the problems of inadequate 
attention from overseas suppliers 
ourselves we are particularly mindful of 
our obligations to our customers. We aim 
to establish a substantial export market 
for our products. 



Simplicity means reliability. 

RECORDING SPEED DENSITY 

STRINGY FLOPPY records at 8500 baud (850 
characters per second). 28 times faster 
than the Sorcerer's lower tape rate, 7 
times faster than its higher tape rate. 
On a 23 metre Wafer you can fit 
approximately 75K. 


CONTROLLER 

The compact STRINGY FLOPPY Controller 
plugs directly into the 50 way connector 
on the back of the Sorcerer. If you 
already have accessories plugged into this 
connector, a 2 for I bus extender is 
available for $A35- The Controller will 
handle one or two STRINGY FLOPPY Drives. 


EXTRA SOFTWARE INCLUDED 

To make room for our Monitor enhancements, 
we had to leave out the Sorcerer's memory 
test. So with each STRINGY FLOPPY we 
include a much more comprehensive Memory 
Test on Wafer. In addition, to enhance 
Sorcerer Basic we include a Data 1/0 
Program that allows high speed storage of 
String Arrays on Wafers. Full 
instructions and a demonstration program 
are included. 


WORD PROCESSOR PAC 

As in the case of disk systems used with 
the Sorcerer, a patch program must be 
loaded from STRINGY FLOPPY to assign 
Exidy's Word Processor Pac input/output to 


Note: Sorcerer and Word Processor Pac 
are products, and no doubt 
trademarks of, Exidy Inc. 

Stringy Floppy is a Trademark of 
Exatron Inc. 



mtCROCOmPUTEHS 

Telephone = 

( 03 ) 2118855 2118344 

797 DANDEN0NG ROAD. 

EAST MALVERN 3145. 

VICTORIA AUSTRALIA. 




r y 

• a real-time graphics game for two players 

• written in machine language for the Exidy Sorcerer™ 

• graphics characters continually redrawn for smooth, high-resolution movement 

• each ship realistically accelerates, rotates, and fires 

• 16K required 

• $20.00 for cassette (includes shipping) [S3 
We think you’ll like it! 


v j 
















ROM PAG NOTEBOOK NO. 1 


THE MESAG METHOD 


by J. de Rivaz B.Sc.(Eng) 

West Towan House, Porthtowan 
Truro, Cornwall TR4 8AX 
United Kingdom. 

Introduction: 

These notes are intended to enable 
newcomers and old hands alike to 
make the best use of their ROM PACs. 
Most of the work will be on the 
BASIC PAC, but we will from time to 
time consider the Word Processor and 
Development PACs. In this first 
article, various ideas not in the Ezidy 
manuals will be summarized, together 
with references. In future, such topics 
as saving arrays from BASIC using 
the monitor routines, no wait key 
polling and machine code generation 
of medium resolution graphics will be 
discussed. 

I invite readers with ideas they 
would like to see included to write in 
with them, and also for those with 
queries to write in with these also. If 
I don't know of a solution, then the 
problem can still be mentioned in the 
column in case another reader knows 
the answer. 

I am also anxious to communicate 
with any reader interested in Im- 
mortalism or Cryonics with a view to 
using home computing as a means to 
contact other 1 Reminded people. It is 
not my intention to discuss these 
matters in this column, though. 


by William A. Heitman 

I was very interested in the program by Bob Stafford which was included in 
Volume I, Number 5 of Sorcerer's Apprentice. The problem of the Development 
Pac's lack of message handling capabilities is a very real one for those of us who 
are attempting to use minimum facilities until we understand more about what 
features we do want in a computer. 

I enlarged Bob's program a bit to include a search routine to find the message 
file location of an executable program. I find it more convenient to assemble a 
program, link it where I want it, and then run this program to add the messages. 
That way I save the program and message file at the same time without the need 
of creating a message file, saving it and reloading it at the end of the assembled 
program and then saving the entire program. 

This program uses all the features of Bob's program (which I have repeated 
below) with a few exceptions: 

The MESAG-method is used to allow the programmer to input the starting 
search address. 

The load address can be entered to facilitate the search or if <CR> is entered, 
the search begins at location 1000H. 

The 'RUB' command is used without the shift (It is not possible to 'RUB' out 
more than the message file or to enter more than 65 characters per line) 

My thanks to Bob Stafford for the idea and the work he did before I got to it. 
Here is the program- 

A machine language program that will search the Exidy Sorcerer memory to 
locate the message location identified by a 'MESAG DEEW 0303' statement at the 
end of the source program. This will allow the programmer to insert any length 
message or messages to be read by a subroutine within the source program and 
will inform the programmer of the lower boundary of the program to be saved 
using the monitor. 


Word Processor ROM PAC: 

Saving with the monitor: 

The file saving methods employed 
by the Word Processor PAC (WP) are 
clumsy to use, and I have not found 
them to be reliable. Therefore I have 
invented a way of saving files with 
the monitor. It can be done by hand, 
by exiting to the monitor with 
Command X, dumping 074AH and 
074BH, and saving from 0740H to the 
quantity held at 074AH. Where the 
number at 074AH is XX and that at 
074BH is YY, enter SAVE TEXT 0740 
YYXX. This is because the Z80 stores 
the high byte second in a sixteen bit 
word. I have produced a little routine 
that saves files this way from an 
unused command. It also takes the 
first five letters after the first 
asterisk in the text as the file name, 
else names the file "TEXT". This 
will appear in a future issue. 

This text can be loaded by exiting 
to the monitor and loading in the 
normal way. The jump to WP warm 
start (0C003) and find your text 
safely loaded. If you have been sent 
text from a WP whose parameters have 
been changed for another printer, and 
you are using an initialization 
routine with your printer, then you 
may need to re-enter via the 
initialization routine. 

The use of monitor loading is quick 
and has the good reliability of 
monitor loads. The only loss is the 
inability to spool through vast 
amounts of text from one cassette 
machine to the other. However, it is 
not impossible to organize one's text 
into chapters so that this facility is 
not needed. If you are using it a lot, 
then you may well be better off using 
discs anyway. 

BASIC ROM PAC: Line Length: 
Poke 322 N, where N is line length. 
This is useful when printing a listing 
on a printer whose line is set for 
more than 64 characters. 

cont'd on pg. 6 


To use this program, proceed as follows: 

>GO nnnn (or LOG program) ; where nnnn is the load address 

Enter load address of program (or <CR>): :MSG #1 

Message buffer located :MSG #2 

enter <Gl> and begin entering messages 

The following value should be used to save 

the executable program and MESAG file 

End address 

>SE X=nnnn (nnnn=load address) 

>SA MESAG nnnn xxxx (xxxx=end address) 

In the event the program search cannot locate the coded value '0303', an 
additional message will inform the programmer of this fact and will return to the 
monitor. 

The MESAG program cannot locate the message buffer : MSG #4 

The coding of this program takes advantage of seme of the input and 

output routines of the monitor. 

If <CR> is entered instead of the LCttD address to the first query, the 

program search begins at 1000H. 

Notes on using this routine: 

This program stores the message file at the end of the assembled, linked 
program. It searches for the value '0303' (ETXETX) and places messages at that 
location. The most logical place for these values is the last statement in the 

source code. However, it can be located anywhere if the programmer is very careful 

aout the message length. 

At the end of each message , enter the 'TAB' key. This will both, insert a null 
in storage (to indicate end-of-message) and clear the screen for the next 
message. 

When the programmer is finished entering messages, (after the last 'TAB') press 
the 'ESC' key and the end address of the file will be displayed at the top of the 
screen as a four digit hexadecimal number. This number will be used to save the 
entire program (see now-to instructions). 

To erase the previous character, use the 'RUB' (no shift) key. This will erase 
the character in the file and if it is on the current line of the video display, it 
will also be erased there. 


continued on next page 
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When testing this program, it will be easier to use an abbreviated test MESAG 
file instead of entering the longer version found at the end of the source code. 
The following entry is suggested: 

>m 1DB6 

1DB6: 00 31 00 32 00 33 00 34 00 03 03/ 

This will indicate a '1' if message 1 is accessed; a '2' if message 2 is 
accessed, etc. 


***** ASSEMBLY MESAG PROGRAM ***** * 


CANNED MNITCR ROUTINES 


MNTR 

EQJ 

0E003H 

VIDBO 

EQJ 

0E01BH 

LININ 

BQJ 

0E13AH 

SNDLN 

BQJ 

0E1BAH 

ACRES 

BQJ 

0E1E8H 

PCRLF 

EQJ 

0E205H 

PARSE 

BQJ 

0E225H 

BI2HX 

EQJ 

0E23EH 

KEYED 

BQJ 

0EB1CH 


ASIGN 

CNTLE 


CALL CLEAR 
ID B,1 
CALL WIMG 
CALL LININ 
PUSH IY 
PCS> HL 
CALL PARSE 
JR Z,ASIGN-# 
CALL BI2WC 
JR CNITJB-# 
LD DE,1000H 
EX DE,HL 


CLEAR SCREEN 

LOAD 'START ADDRESS' MESSAGE NUMBER 
WRITE MESSAGE #1 TO SCREEN 
GET PROGRAM START /EDRESS 
CHANGE START AEDRESS LOCATION 
FCR CANNED ROUTINE CALL 
GET ALL POLR INPUT CHARACTERS 
IF NO INPUT - ASSICN VALUE 
OCNVERT TO HEX 
DO NOT ASSIGN VALLE 
ASSIGN 100OH TO START ADDRESS 
MDVE START AEDRESS TO REGISTER HL 


***** FIND SEARCH SIRING ***** 


9 

FNDBT 

ID BC,8000H 

ID A,03H 

CPIR 

JR Z, SECND-# 

ID B.4 

CALL WRTMG 

CALL MNTR 

LOAD NIMBER CF SEARCH LOCATICNS 

LOAD CHARACTER 'ETX' 

GCMPARE BYTE AGAINST MBCRY GCNTENTS 

IF EOLND - CHECK FCR SECEND BYTE 

IF NOT - LOAD 'NOT FOND’ MESSAGE NIMBER 
WRITE MESSAGE #4 TO SCREBJ 
; RETURN TO MCNITCR 

SECND 

CP 

JR 

JR 

(HL) 

Z,IEMSG-# 

FINDBT-# 

; IS IT A SEGCND BYTE MATCH? 

; IF IT IS - START ENTERING MESSAGE 
; IF NOT - SEARCH FRCM CURRENT POSITICN 

* 

i 

«»*»£ 

INPUT MESSAGE ***** 


IDMSG 

REP ET 

imir 

NEHM3 


MSGIN 


DEC HL 
DEC HL 
CALL CLEAR 
VUSH HL 
ID B,2 
CALL KEYED 

8 SsT”'-' 

JR NZ.REPET-# 
PCP HL 
PUSH HL 
INC HL 
ID (HL) ,0 
PCP DE 
PUSH HL 
ID B,64 
CALL CLEAR 
CALL KEYED 
JR Z,MSGIN-# 
OP 27 

^R Z,GOOUT-# 

fR Z,NEWVG-# 
CP 95 

JR NZ,SIRGE-? 
PCP DE 
PUSH DE 
PUSiHL 
SBC HL,DE 
PCP HL 
JR C,MSGIN-# 


; DECREMBMT MBCRY LOCATION 
; TO OVERLAY SEARCH BYTES 

; CLEAR SCREEN 

; STORE CURRENT MBiORY LOCATION 
f LCHD 'BTIER MESSAGE' MESSAGE NIMBER 
; GET CHARACTER FROM KEYBOARD 
; WATT FCR INPUT 
; IS CHARACTER A 'CR'? 

; IF NOT - NEHD TO KEY 'CR' TO GNTINLE 
;* RESTORE CURRENT MB4CRY LOCATION 
; SAVE CURRENT MBCRY LOCATION 
; INCREMENT CURRENT MBiORY LOCATION 
; LOAD NULL IN FIRST MESSAGE LOCATION 
; CLEAR STACK - HOUSEKEEPING 
; STORE CURRENT MBCRY LOCATION 
; LOAD CRT CHARACTER -PER -LINE OOLNT 
; CLEAR SCREEN 

; GET CHARACTER FRCM KEYBOARD 
; WAIT FCR CHARACTER 
; IS CHARACTER 'ESCAPE'? 

; IF IT IS - GET OUT 
; IS CHARACTER 'TAB' 

; IF IT IS - START NEXT MESSAGE 
. TQ rHARArTPP a ^tir* 

\ IF NOT - WRITE CHARACTER TO STORE AND SCREEN 
; RESTORE LINE-START MBCRY LOCATION 
; SAVE IT FCR NEXT TIME 
; SAVE CURRENT MBCRY LOCATION 
; SUBTRACT START FRCM CURRENT LOCATION 
; RESTORE CURRENT MBCRY LOCATION 
; IF MINUS VALLE - DON'T ERASE 


continued on next page 
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BASIC ROM PAC: Printer output: 
Poke Monitor Work Area (MWA) plus 
63 with low byte and plus 64 with 
high byte of printer driver routine. 

BASIC ROM PAC: "INKEY": Poke 
318,195: Poke 320,224. The statement 
"A=Inp(24)" then gives the ASCII 
code of any key pressed in A. If a 
BASIC line is of the form "1224 
A=INP(24):If A=0 Then 1224", then 
it loops until an input is received. 
Alternatively, particularly in games 
programs, it can be arranged so that 
a program reacts only if a key is 
pressed else it runs on to something 
else. If however, a key is held down, 
everything stops until it is released. A 
routine that gets over this problem 
will be detailed in a future issue. It 
is used in the game "Cryonics Society 
Organiser" published in SA3.6, Sep¬ 
tember 1981, but only some of its 
features are employed in this game. 

BASIC ROM PAC: "RANDOMIZE": 
Continuing on from the above idea, if 
the statement were to read "1234 
A=RND (l):A=Inp(24 ):If A=0 Then 
1234" the RND function is called 
every time the line loops. As there 
will be a variable time whilst the 
operator responds to the loop, the 
RND is effectively shuffled or ran¬ 
domized. [Reference - for further 
reading on the reason why Inp(24) 
works, see SPEC 10 p3 - (Now ESC, 
European Sorcerer Club newsletter 32. 
Watchyard Lane, Formby, Liverpool 

L37 3JU, U.K.)J 

Finally, these introductory notes 
on the ROM PACs wouldn't be 
complete without mentioning that the 
Development PAC is several orders of 
magnitude easier to use if you get 

Quality Software's Development PAC 
extension, DPX. This allows rapid 
switching between editor and as¬ 

sembler and easy saving of files on 
cassette using monitor routines, as 
well as a number of useful editing 
functions. ($2 9.95 Address 6660 Re¬ 

seda Boulevard, Suite 202, Reseda, CA 
91335 ) 

Similarly the BASIC PAC is enor¬ 
mously improved by using one of the 
Editors on the market. The one by 
Ray Bannon, handled by my own 
firm, costs #12 and has a number of 
useful editing functions and com¬ 
mands. For details see advertisement 
in SA vol 3 no 3, or write. Others 
include the SPEC /Grim shaw Toolkit 
which is available from a number of 
suppliers including North American 
Software for about #30, two from 
Arrington Software for #10 and #22, 
and the rather different "System 3" 
from System Software and others for 
about #A30. I have not seen System 
3, but it uses the same commands as 
the word processor. For further 
details, see ESC18 p 11, where it is 
reviewed. It was generally liked except 
for the fact that one has to call up 
specific lines to edit them. 1 would 
doubt whether it really matters which 
editor you get, but get one and 
you'll find your BASIC very much 
easier to write. The cost is not a big 
percentage on the price of your 
Sorcerer! 

The Word Processor PAC is designed 
to work with costly printers that the 
average user is unlikely to be able to 
afford. There are a number of printer 
adaptors available for different prin¬ 
ters. One for the Centronics 737 is 
dumped as part of an article on the 
Centronics 737 in ESC 14, and others 
are available from suppliers of 
printers. <> 











4th TIP 

by Tim Huang, Forth Editor 
The Screen Editor - Part 2 

In the las tissue (#7) I used top-down 
programming design to lay the foun¬ 
dation for the Screen Editor. All of our 
designing should be approached in this 
fashion. You should also keep die term 
'structured programming' in mind as we 
work with FORTH, since it forces you to 
be structured in your approach. 

After we define the high level WORD 
concepts, we then descend to the next 
level, repeating this process until we 
reach the lowest level, in which all the 
WORDS do the heavy, dirty work. You 
can then treat yourself to the joys of 
keying in your routine from the bottom 
up. 

At this point one must be very careful 
to resist a common programmers' malady 
known as 'keyboard syndrome'. This 
affliction is characterized by an 
uncontrollable urge to begin banging 
away at the keyboard. Control of this 
scourge is evidenced by returning to the 
drawing board. We must now decide what 
tools are needed to accomplish our goals. 

Referring back to the diagram on page 
151 of issue #7, we see several unusual 
symbols which we've never seen before in 
a tlow chart. The diagram is not really a 
flowchart, but a TD-chart*. The vertical 
line, with the word INSTRUCTIONS on 
it, is the symbol for the direct route 
through the program. The intersecting 
point, which should have shown a circle 
with an X tilling it, is the symbol for a 
loop which ended with the large dot. The 
last of the symbols are the Y and 
inverted Y which stand for: IF (true) 
ELSE (false) THEN.As you can see, it is 
possible to literally translate the D- 
chart directly into FORTH words. For 
further details about D-charts refer to 
Mr. Kim Harris' article on this topic in 
Forth Dimensions Vol. I, NO. 3, pages 
30-32. 

There was one set of symbols which I 
did not mention above. They were the 
IF-ELSE-THEN . But I did. They were 
nested IF- ELSE-THEN. We just 
created a new symbol for it. Under the 
multiple choice situation we can write the 
program as: 

(flag) IF A 
IF B 

IF C ELSE D THEN 
ELSE F THEN 
ELSE E 
THEN 

Notice that the number of IF's should 
be paired with the same number of 
THEN's. It would be nice if we didn't 
have to type so many IF-ELSE-THEN'*. 
This is possible with the CASE 
statement. 

The CASE statement leaves you a 
choice. It makes the whole program much 
easier to read. I can never keep trad: of 
more than 2 or 3 IF-ELSE-THEN's. 

There are many ways to implement 
CASE. In fact each CASE would be 
designed for its case. But 1 think in 
general, we can categorize the CASE to 
two cases: 

cont'd on page 14 


GRCHK 


DEC HL 
INC B 
INC B 
ID A,8 
CALL VIDEO 


JR 

INC 

ID 

CALL 

DJNZ 

ID 

JR 

CP 

JR 

SLB 

ID 

JR 


MSG IN-# 

HL 

(HL) ,A 
VIDEO 
CRCHK-# 

A, 13 
STRGE-# 

13 

NZ,MSGIN-# 

3 

B, 65 
STRGE-# 


POINT TO LAST CHARACTER 

INCREMENT CRT CHARACTER-PER-LINE GXNT 

INCREMENT QUINT AGAIN 

LOAD ERASE CHARACTER 

WRITE ERASE CHARACTER TO SCREEN 

GET NEXT INPUT FRCM KEYBOARD 

INCREMENT CURRENT MEMORY LOCATICN 

STORE CHARACTER 

WRITE CHARACTER TO SCREEN 

IF NOT 65 CHARACTERS - CHECK FCR 'CR' 

IF IT IS - LOO 'CR' CHARACTER 

WRITE 'CR' TO SCREEN AO STORE 

IS CHARACTER A 'CR'? 

IF NOT - CONTINUE 

PUT 'LF' IN REGISTER A 

LOAD CRT CHARACTER-PER-LINE COUNT 

WRITE 'LF' TO SCREEN AND STORE 


CLOSING ROUTINE 


GOCUT ID (HL) ,0 
PUSH HL 
ID B, 3 
CALL WRTMG 
CALL PCRLF 
CALL PCRLF 
PCP HL 
CALL ADRES 
CALL PCRLF 
CALL MCNTR 


CLOSE FILE WITH NULL 
SAVE MEMORY LOCATICN 
LOAD 'SAVE' MESSAGE NUMBER 
WRITE MESSAGE #3 TO SCREEN 
WRITE 'CR' AND 'LF' TO SCREEN 
MOVE DOWN ANCJIHER LINE 
RESTORE LAST MBERY PCSITICN 
WRITE LAST PCSITICN TO SCREEN 
DOUBLE SPACE VIDBO OUTPUT 
RETURN TOMCNITCR 


PROGRAM SUBROUTINES 


CLEAR ID A,12 
CALL VIDEO 
RET 


LOAD ERASE CHARACTER 

WRITE ERASE CHARACTER TO SCREEN 

RETURN TO HOST PROGRAM 


WRTMG ID HL,MESAG 

XCR A 

NXIBT CP (HL) 

INC HL 

JR NZ, NXIBT- # 
DJNZ NXIBT-# 
CALL SNDLN 
RET 


GET MESSAGE FILE LOCATICN 
ZERO CUT REGISTER A 
COMPARE MFMCRY LOCATICN 
INCREMENT TO NEXT LOCATICN 
FIND END CF MESSAGE 
FIND END OF SPECIFIC MESSAGE 
WRITE MESSAGE TO SCREEN 
RETURN TO HOST PROGRAM 


; ••••• PROGRAM CONSTANTS •**♦* 

MESAG DEFW 0303H ; SYNBCL ECR END CF EXECUTABLE PROGRAM 


♦ END CF PROGRAM 


After assembling and linking this program in its final form, use the 
monitor '04* ccnmand to enter the following MESAG file: 

>EN 1DB6 
MSG #1 


1DB6 

00 

45 

6E 

74 

65 

72 

20 

6C 6F 

61 

64 

20 

61 

64 

64 

72 

65 

<CR> 

1DC7 

73 

73 

20 

6F 

66 

20 

70 

72 

6F 

67 

72 

61 

6D 

20 

28 

6F 

72 

<CR> 

1ED8 

20 

43 

52 

29 

20 

3A 

20 

<CR> 










MSG #2 



















1H>F 

00 

0D 

0A 4D 65 

73 

73 

61 

67 

65 

20 

62 

75 

66 

66 

65 

72 

<CR> 

1DF0 

20 

6C 

6F 

63 

61 

74 

65 

64 

0D 

0A 

20 

20 

20 

20 

65 

6E 

74 

<GR> 

1E01 

65 

72 

20 

28 

43 

52 

29 

20 

61 

6E 

64 

20 

62 

65 

67 

69 

6E 

<CR> 

IE 12 

20 

65 

6E 

74 

65 

72 

69 

6E 

67 

20 

6D 65 

73 

73 

61 

67 

65 

<CR> 

1E23 

73 

2E 

20 

<CR> 














MSG m 



















1E26 

00 

0D 

0A 54 

68 

65 

20 

66 

6F 

6C 

6C 6F 

77 

69 

6E 

67 

20 

<CR> 

1E37 

76 

61 

6C 75 

65 

20 

73 

68 

6F 

75 

6C 64 

20 

62 

65 

20 

75 

<CK> 

1E48 

73 

65 

64 

20 

74 

6F 

20 

73 

61 

76 

65 

0D 

0A 

20 

20 

20 

20 

<GR> 

1E59 

74 

68 

65 

20 

65 

78 

65 

63 

75 

74 

61 

62 

6C 

65 

10 

70 

72 

<CR> 

1E6A 

6F 

67 

72 

61 

6D 

20 

61 

6E 

64 

20 

4D 45 

53 

41 

47 

20 

66 

<CR> 

1E7B 

69 

6C 

65 

2E 

20 

<CR> 












MSG #4 



















1E80 

00 

0D 

0A 54 

68 

65 

20 

4D 

45 

53 

41 

47 

20 

70 

72 

6F 

67 

<CR> 

1E91 

72 

61 

6D 20 

63 

61 

6E 

6E 

6F 

74 

20 

6C 

6F 

63 

61 

74 

65 

<CR> 

1E2A 

20 

74 

68 

65 

20 

6D 65 

73 

73 

61 

67 

65 

20 

62 

75 

66 

66 

<CR> 

1EB3 

65 

72 

2E 

00 

/<CR> 
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PROGRAMMING HINT 
by Carl R. Manning 
SORCERER VERTICAL TAB 

Construct the following string in the beginning of your BASIC program: 

10 VT #=CHR# (10 ):REM line feed 

20 FOR L=1 TO 5:VT#=VT#+VT#:NEXT L:REM make a string of them 
30 VT#=CHR# (17)+VT#: REM add Home at the beginning 

Now whenever you want a vertical tab you can use a statement similar to the 
following: 

50 PRINT LEFT# (VT #,10 ) ;TAB(30) "MENU" ;LEFT # ( VT #,20 ) 

Notice that "LEFT# (VT#,1)" puts you at the top line and LEFT# (VT#,30) " 
puts you at the bottom line. Computer count from zero does not apply here. 

You can extend this principle to make a "no erase" horizontal tab as follows: 

10 HT#=CHR# (19):FOR L=1 TO 6:HT#=HT#+HT# 

20 NEXT:HT #=CHR# (13 )+HT # 

30 FOR L=1 TO 5 

40 : READ CATEGORY# 

50 : PRINT LEFT# (VT #,L*2+5 ) {CATEGORY# 

60 NEXT L 
70 FOR L=1 TO 5 

80 : PRINT LEFT# (VT #,L*2+5) ;LEFT# (HT #,32 );:INPUT C(L) 

90 NEXT L 
100 DATA ... 

Personally, I like to see the cursor only when the computer is waiting for me to 
do something. Therefore I often make and use the following "hide cursor" string: 

10 HC#=CHR# (13 )+CHR# (1):REM carriage return plus left arrow 
50 PRINT CHR# (12) ;LEFT# (VT#,15) ;TAB(25) " Sorting..." ;HC# 

60 REM sort ... 

Be sure to include the ";" after HC#; otherwise the cursor will pop out again. 
Two final notes: Be sure to CLEAR enough string space if you are working in 
Standard Basic. If you are working in a high powered Disk Basic, you might 
consider DEFining VTAB and HTAB as string functions. 

******************************* 


SCRQBRER REPAIRS 
****************************** 

Is your beloved Sorcerer down? Having too many GRC errors.? Would you like 
more memory? Just want seme help or advice? I am a professional technician, 
able to competently service the following units at reasonable rates and 
promptness. All repairs are fully guaranteed for 90 days! 


Exidy Sorcerer I & II 
Dot Matrix Printers 
Exidy Expansion Box 


Video Monitors 
Acoustic Modems 
All RCM Pacs 


And, SOCN, Disc Drives and S-100 Cards! 


Send all inquiries to me, or call me after 6:00 pm EST; I will be happy 
to answer all questions. 


Jack MacGrath 

70 Tercentennial Drive, P. O. Box 5 
Billerica, MA 01821 Tel. (617)6 67-8272 

****************************** 
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FOR YOUR 
SORCERER 


C/80 Supports: 

Character and integer types 
Pointers and arrays 
String constants 
All C math and logic 
Full function recursion 
-All C control statements 
I/O redirection 


Based on Ron C ain 1 s 
small-C, C/80 was written 
by Walt Bilofsky of the 
Software Toolworks. 
Triangle Systems distributes 
C/80 for the Sorcerer with 
an enhanced tutorial 
introduction to C/80. C/80 
needs at least 40K of RAM 
and either Exidy or 
Micropolis C/PM. 


C/80 gives you the power 
and efficiency of structured 
programming. Programs 
written in C/80 run up to 10 
times faster than BASIC and 
require less debugging. 

$4900 


Standard C I/O library 
Dynamic storage allocation 
C preprocessor statements 

C/80 includes: 

C/80: compiler and library 
CASM: absolute assembler 
Sample C/80 programs: 
file compression utility 
file comparison utility 
WP Pac file conversion 


Ask your Exidy dealer for Triangle System prod¬ 
ucts or order direct: specify hardware configu¬ 
ration and software format (1200 baud cassette, 
Exidy CPM, or Micropolis CPM), add $3.00 
domestic, $8.00 overseas shipping and han¬ 
dling, 5.5% sales tax in Ohio, and send check or 
money order in US funds to: 



TRIANGLE SYSTEMS 

P.O. Box 44026, Columbus, Ohio 43204 



mentzer 

electronics 


590 South Hill Boulevard, Daly City, California 94014 
(415) 584-3402 


*********************************** 


CP/M Catalog program, good for cataloging your CP/M disks # 75.00 

dBASE II Relational Dat abas e Management Program #595.00 

Exidy 1.1 Monitor RCMS # 45.00 

SPELLBINDER Word Processor #395.00 

Now also for the Exidy 77 track 
soft sectored drives. 

SPELLCHECK Dictionary program to work with #295.00 

SPELLBINDER 

CP/M 2.2 For the Exidy with Micropolis hard sector #190.00 

drives only. (CP/M is a trade-mark 
of Digital Research) 


We have Exidy, Godbout Electronics, and Morrow Designs hardware. 
Check with us for all your hardware needs. 


********************** 

MASTER CARD and VISA on orders of #50.00 or more. 
Shipping will be added to all orders. 
California Sales Tax added for CA residents 
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DUSTINGS FROM THE LIBRARY 
by Robert Hageman, Librarian and Sysop 

Let us tesume our discussion of the CP/M communication 
programs with MODEM. 

MODEM was originally written by Ward Christensen 
(Ward's best known program is CBBS). Since he released it 
to the public domain, MODEM has undergone almost 
constant revision. Assembly switches have been added for 
non-standard QP/Ms and various modem boards and serial 
modems. The original purpose remains, provide reliable uni¬ 
versal communication between any two CP/M systems. One 
revision is important to our croup, XMODEM by Petersen is 
a qirect descendant of MODEM. XMODEM is the remote 
version for use by callers to an RCPM, it's revision history 
is similar to MODEM'S. These two programs provide direct, 
speedy, correct, transfer communication between the "home 
or business" ComputerLand the "public" RCPM systems 
(quotes are due to public RCPMs being, most often, public 
use of of a home or business computer). 

B The most often heard question about MODEM; "Now that 
I've got it, what, do I do with it?". First thing, put Smart 
Terminal (ST) into storage. You will never need ST as 
long as you operate CP/M and have the MODEM program. 
Now you can go software shopping on the RCPMs, ALL the 
software is there for the price of a phone call. 


BITS a BYTES 
by Jonathan Burnett 

HAPPY NEW YEAR everyone. Those of you that have used 
(or attempted to use) EXIDY's Z80 DEVELOPMENT PAC 
are probably experienced in the problems I discussed in the 
last issue. That is, the constant modification of the I/O 
vectors just to go from one module to another is truly a 
headache, and tends to make one wonder if the 'end really 
justities the means'! 

Well, as I said in the last issue, help is on the way...in 
fact its already here: read the article on page 14, which 
provides us with a little utility in machine code that eases 
our problems immensely! 

Once you have keyed this program in and saved it to 
tape, you can really speed up your development process: 

From DDT enter: E E003 [cr] 

From the MONITOR enter: LOG DEVX [cr] 

After it is loaded, you will return to DDT, but with a 
different outlook on life! No longer will you have to set 
those I/O vectors manually. You now can do all the things 
we discussed in the last issue by the following steps: 


To operate Modem, set up one of the following commands; 

MODEM TO.300 for an S-100 modem board 

MODEM T for serial modem 

T= terminal mode, 0= originate mode, and .300= 300 baud. 
You need not give a <CR> just yet. Contact the RCPM or 
other system of your choice, When the carrier tone is 
heard, enter a <CR>. Then wait for Modem to sign-on, seat 
the phone in the cradle if using a serial modem, hang up 
the phone if using an S-100 board. Type <CR>s until the 
remote system signs on. (Hint: most remote systems are 
using a program which scans for the baud rate. Beginning 
at 110 and progressing through 300, 450 and 600 this 
program looks at inchftung data until it recognizes either a 
<CR> or linefeed). There is no need to beat out <CR>s at 
100 per minute, as a matter of fact, the response of these 
remotes should occur on one of the first four <CR>s sent. 
Therefore typing the <CR>s in a smooth unhurried manner 
can act as a diagnostic procedure in that no response after 
four <CR>s generally means problems and after eight means 
"There are problems!". 

Ok, we have contact with the RCPM. Locate the files of 
interest to you and you are ready to transfer them. Tell 
the remote system; XMODEM S FILENAME.T YP; and wait 
for Xmodem to sign-on and tell you the file is open and 
the program is ready to transfer the file. Enter a control - 
E on your end. This returns you to YOUR system, enter 
one of the following; 

MODEM ROT.300 FILENAME.TYP<CR> for S-100 modem 
board 

MODEM ROT.300 d:FILENAME.TYP<CR> 

MODEM RT FILENAME.TYP<CR> for serial modem 

MODEM RT d:FILENAME.TYP<CR> . 

R= receive a file, 0= originate mode. T= return to terminal 
mode after transfer, .300= 300 baud, d:= optional drive to 
save file to, and FILENAME.TYP= what to call the 
incoming file. 

At this point the two programs will establish handshaking 
and the transfer will be done automatically. If any are 
interested in the exact manner of the transfer, please see 
MODEMPROJDOC on our system. Modempro explains the 
modem protocol use by these programs. 

Modem will report "TRANSFER COMPLETE" and the 
remote system will again prompt you for commands. You 
may also send files to a remote system by using: XMODEM 
R FILENAjVlE.TYP and MODEM SOT.300 d: FILENAME.T YP. 
The transfer proceeds as did the previous case. 

So much fox RCPM transfers. You may also use Modem 
to communicate with a/iy other system also using modem. 
The only differences m the commands are those options 
necessary to set up one computer as "The Computer" and 
die other as "The Terminal, by agreement with the other 
party; 

Computer: 

MODEM EA.300, MODEM RAE.300 or MODEM SAE.300 

/\ A 

to computer to terminal normal 

communication transfer transfer 


Terminal^ ^ 

MODEM TO.300, MODEM SOT.300 or MODEM ROT.300 . , 

E= echo mode, A= answer mode and S= send a file* Serial 
modems will not need to use the A, O or .300 sub-options, 
as answer or originate is handled by a switch on the modem 
and the baud rate is standard. 

READ THE DOC FILE BEFORE YOU ATTEMPT TO USE 
MODEM, it saves time and aggravation in the long run. 
Next issue we'll continue with the CP/M communication 
programs. 


1. TYPE: CNTL-E (1st time entry to EDITOR) 

2. Key in your assembly language program. 

3. TYPE: CNTL-D (Returns to DDT; 

4. TYPE: CNTL-A (Assembles your source file) 

(NOTE: During assembly die RUN/STOP key will pause the 
listing so you can eaten the error messages. The space bar 
will continue the listing. CNTL-C aborts the assembly and 
returns to DDT.) 

5. TYPE: CNTL-R (Re-enters the EDITOR to correct 
any errors) 

6. Now repeat steps 3 thru 5 until you are satisfied with 
the results. 

This saves you many steps and a lot of grief if you're as 
prone to making mistakes when setting the vectors as I am. 
Though not perfect or as automatic as you might like it, 
but the price is right! 


For those of you who prefer a bit more (an 
understatement), have I got a DEAL for you QUALITY 
SOFTWARE markets a DEVELOPMENT PAC EXTENSION 

B roduct similar to the one in this issue. It is written by 
on Ursem, and goes a light year or two beyond our 
freebies! I personally use it exclusively and have done so 
for over a year and a half with much enjoyment! Here is 
what you can expect for the #29.95 that QS charges: 


From DDT enter: E E003 [cr] 

From MONITOR enter: LOG DPX48 [cr] (There are 
different versions for 8K. 16K, & 32K SORCERERS, plus 
they supply you with a load module version, so you can 
relocate it to any location you desire!) After it loads and 
displays a sign-on message, you will be in DDT mode. The 
DEVELOPMENT PAC will now function normally as before, 
but you will have approximately 22 additional commands at 
your disposal. You will now get spoiled very .quickly! The 
most time consuming aspects of using the PAC is when using 
the EDITOR to key and edit your source code file. With 
DPX, you enter the EDITOR by typing: #ED [cr]. This is 
the only command you need to enter the EDITOR, (unless 
you wish to reinitialize the edit buffer, in which case you 
would use the old E :ED). Gone FOREVER will be the 
accidental destruction of your source file by forgetting to 
use the editor restart command! The. excellent docu¬ 
mentation accompanying DPX also explains how to recover 
from an intentional destruction of your source file. 


Once you are in the EDITOR.,. you'll have 12 . new 
commands to enjoy. You can position your line, pointer 
backwards now, with the #U command. It will position the 
line pointer UP the number of lines you specify. You can 
also position the line pointer with the #F command. #F 
Slows you to FIND a string, starting at the current 
position of the linepointer to the end ot file. It will then 
point to that line. The #U command will also allow you to 
search for a, string, however.it only searches badewards from 
the current line pointer position. Speaking of line pointers, 
that mysterious and invisible marvel, the #LI command will 
display its value and the line whenever you want! 

You'll really appreciate the next two commands: #C and 
#QC. The #C is a global string find and. replace 
command. You specify which string .you wish to find, and 
the string you wish to . replace it with. (The replace 
function is automatic, without operator intervention). You 
can also specify how many lines you wish it to search. #QC 
performs essentially the same function as #C, but when you 
press enter, it finds the 1st string, and prompts you for a 
f Y' to proceed with the change or any other key to continue 
the search with no changes made. Pressing the ESCAPE key 
to aborts the function. tNOTE: both commands work m the 
downward direction, toward the end of the file. 


continued on page 20 
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APPRENTICE PORT 
by Don Gottwald, President 

In the last issue (#7) we covered some of the terminology used in assembly 
language coding. This time we will follow a complete cycle of instructions from 
fetching of the instruction from memory, to decoding by the instruction register 
(IR) and finally to execution of the instruction. Refer to the diagram for clarity. 


The memory chip can be of any type - ROM, RAM etc. Memory chips store 
instructions and data. Some additional terms have to be defined. All instructions 
are executed in three phases: FETCH, DECODE, EXECUTE. Each of these phases 
require several clock cycles. The Z-80 executes each phase in one or more machine 
cycles. The shortest machine cycle lasts three clock cycles. Accessing the memory 
requires four clock cycles. Since each instruction must be fetched from memory the 
fastest instruction requires four clock cycles. 

The FETCH phase of an instruction is implemented during the first three states 
of a machine cycle. These three states (clock cycles) are necessary for all 

instructions of the microprocessor, since all instructions are in memory and must 
be fetched prior to decoding and execution. 

The first clock cycle (state) presents the address of the next instruction to the 
memory. This address is contained in the program counter register (PC). The 
contents of the PC are placed on the address bus. The memory address decoder 
will decode this address to select the proper memory location. Several hundred 
nanoseconds later the selected memory location's contents becomes available at the 
output of the memory which is connected to the data bus. This is dock cycle 

number 2. While the memory is being read (dock cycle #2) the contents of the 

program counter (PC) are incremented by one. At the end of clock cyde 2, the 
contents of the memory are available and can be transferred within the 

microprocessor to the instruction register (IR). This is clock cyde #3. The 

instruction which has been read out of memory is deposited on the data bus and 
transferred into the instruction register (IR), where it will be decoded. During the 
fourth clock cycle the instruction deposited during dock cycle 3 is decoded by the 
control unit of the microprocessor. The control unit then generates the correct 
sequence of internal and external signals for the execution of the specified 

instruction. 

There is a short decoding dday followed by execution of the instruction, the 
length of which depends on the nature of the specified instruction. Some 

instructions will execute entirdy within the MPU, while other instructions will 
fetch or deposit data from or into memory. This is why the various instructions of 
the MPU require various lengths of time to execute. This duration is expressed in 
number of clock cycles. 

During the execution of a program, instructions are in sequence from memory. 
There is an automatic mechanism within the MPU which fetches instructions m 
sequence. This is called the Program Counter (PC). Whenever the contents of the 
PC register are deposited on the address bus, an incrementer attached to it 

automatically increments the contents and writes it back into the PC register. If 
the PC contained the value 'O' in the beginning it would be output to the address 
bus. Then the contents would be incremented and the value *1' written back into 
the PC. The next time the PC would be used, it would point to the correct 
instruction at the next memory address. 



The numbers in the diagram refer to the clock cycles (states). 

It is difficult to write this column without some specific input from you, so 
please, let me know what you would like to see in this column. I would appreciate 
any comments and or suggestions to be sent to the Sorcerer's Apprentice, ATTN: 
Apprentice Port. Thank you. 


PROTECT YOUR EDITOR 

Howard Arrington's Edit7 editor for 
Exidy Standard Basic is a good one. 
With Edit7 loaded at 7000H, and input 
set to 7000H (SET 1=7000), the user can 
enjoy the benefits of a true screen editor 
plus a very useful renumbering routine 
and, with the optional cross-reference 
routine, a means of generating a variable 
and program flow cross-reference table. 
A very nice package. 

Just one problem. Edit7 resides in 
Basic territory; in a 32K Sorcerer, the 
machine-language editor at 7000 H 
leaves some room for Basic string storage 
from 7EFFH downward. But what 
happens if, when the program runs, Basic 
strings overwrite the editor? Just as 
you might expect, a complete blitz of 
both the Basic program and the editor. 

Of course, you can reset input to the 
keyboard monitor routine before you run 
the program (SET I=K). But then the 
editor must be reloaded before you again 
set input to the editor; forget to reload 
before SET 1=7000, and another hang¬ 
up results. 

Joseph Power and Earl Youngs of East 
Lansing, Michigan have discovered an 
undocumented feature of the CLEAR 
command in Exidy Basic. With the 
format CLEAR N.n (where N is the 
decimal number of bytes to reserve for 
string space, and n is the decimal limit 
of memory that Basic will be allowed to 
use), the Arrington editor can be 
protected from being overwritten by Basic 
strings. 

Simply by using this CLEAR command 
as the first statement in your program, 
with the parameters CLEAR N,28671, the 
editor will be protected. 

However, this leaves a bunch of memory 
above the editor, and below 7EFFH, 
unused. To make more memory avail¬ 
able, it would be useful to relocate the 
editor higher in memory, to just below 
the Monitor stack. One could write a 
program to do the relocating, but 
perhaps it's just as easy to do it tne hard 
way, with the Monitor ENTER command. 
To do so, follow the instructions: 

1. From the Monitor, with the Edit7 
and Cross-Reference program in memory 
at 7000H, type: MO 7000 75A0 7900. 


2. Enter the following bytes at the 
addresses indicated: 

7939:7E 793E:7A 7950:7A 

7961:7A 79A6:79 79B3:79 

79D8-.79 79E1:79 79FB:7A 

79FF: 7A 7A05-.79 7A34:79 

7A3A:7B 7A40 :7B 7A43 : 7B 
7A46:7B 7A4E:7B 7A53:7A 

7A78:7B 7A7F:7B 7A82:7B 

7A85-.7B 7A9F-.7B 7AA6:7B 

7AB1:7B 7AB8:7B 7AC8:7B 

7ACD: 7B 7ADB: 7B 7AE2: 7A 
7AE5:7A 7AEC:7B 7B0B:79 
7B16:7B 7B1A:7B 7B1D:7B 

7B21:7B 7B37:7B 7C06:7C 

7C10:79 7C13:7E 7C16-.79 

7C64:7C 7C6C:7C 7C72:7C 

705 :7C 70D:7C 7C82:7D 

7C89:7C 700:7C 7D00 :7C 
7D04:7C 7D07:7C 7D13 :7C 
7D1C:7C 7D24:7C 7D37-.7C 

7D3E:7C 7D43:7C 7D4E:7C 

7D54:7C 7D65:7C 7D6C:7C 

7D77:7C 7D7A-.7C 7D7E:7C 

7D82:7C 7D8B-.7C 7D92:7C 

7D9A-.7C 7D9F: 7C 7DA3:7C 

7CAD: 7C 7DB6:7C 7DB9:7C 

7DC6: 7C 7DCD: 7E 7ED1: 7C 
7DE7:7E 7E5F-.7E 7E6B:7E 

7E78:7E 7E91:7A 7E96-.7C 

7E99-.79 7E9D-.79 


3. With these changes made, SA EDIT7 
7900 7EA0 to tape. Then, when you 
load the tape (don't LOG this onel) SET 
1=7900, write a first line in your Basic 
program CLEAR N,30975, and you're in 
business. <> 

It 
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ARRINGTON SOFTWARE SERVICE 

9522 Linstock, Boise, IDAHO 83704 


SORCERY BREWS is a manual of programming tricks specific to the Sorcerer, This ready 
reference of valuable examples simplifies programming efforts and improves both 
professional appearance and performance. The manual has chapters on programming Tips, 
Basic's Commands and Functions, Keyboard, Video, Joysticks, Sound, the Monitor, Machine 
Language Interfacing and Routines, I/O Drivers, Cassette Tape, a source listing of an 
Editor for Basic, CP/M, Word Processor, Development PAC, Plotting, tables and forms. Best 
of all, we are very proud of the extensive Basic ROMPAC Map which identifies dozens of 
useful ROMPAC routines and how they work. Customers have been hungry to have this kind 
of information collected together and concisely presented in a single manual. I've gleaned 
my mind of every clever and useful piece of information I know about the Sorcerer. 
Everyone is sure to discover something they will treasure. Believe me, YOU*LL USE THIS 
MANUAL ! It's over 100 pages long and stuffed with hundreds of 'brews*. jf 16.95 


CHOMP is an absolute must foi every game enthusiast. It is better than the Pac-Man 
arcade game where you are being chased through a maze of alleys by four Monsters who 
will eat you if they can catch you. As you maneuver around to keep out of the way of the 
Monsters, you score points by eating small dots found in the alleys. If you eat one of 
the large dots, you become mightier than the Monsters in that you can now chase, catch 
and eat them. You score big for each monster you chomp, but be careful as they soon 
return to their normal rolls as the aggressors. The game is a superb display of high 
resolution graphics. The program is 100% machine language for speed and ease of use by 
all of our customers, disk based systems included. This program is fantastic. WE LOVE 
IT!! Move over Galaxians -- you have to share some of the spot light for the elite with 
this new game entry. The game includes fantastic sound effects and joytick or keyboard 
control. It has action, excitement, suspense and requires strategy. £19.95 


All orders are in the return mail within 3 days. Software is recorded at both 300 and 1200 
baud and is guaranteed. We seek to have your approval and satisfaction. We will try to 
answer questions and be of service in every possible way. 


KEY: B-Basic, M-Machine code, U-Utility, G-Game, S-Sound, J-Joystick or Keyboard, 
H-Hardware, E-Education, F-Music File 


HOWARD ARRINGICN 


IHCNE: (208)377-1938 Daytime or Evenings 


[ ] MUSIC SYSTEM I £40.00 BMUSHEF 

[ ) PIANO PLAYER £15.00 MF 

f 3 MUSIC SYSTEM II £59.95 BMUSHEF 

[ ] FINLA1SDIA FANTASIA £10.00 FF 

[ ] BOOGIE & ELEANOR £10.00 FF 

£ 3 ' JESU' & CDE TO JOY £10.00 FF 

[ ] STRAUSS WALTZES £ 5.00 F 

[ ] HAYDN SERENADE £ 5.00 F 

£ 3 MCEART RONDO £10.00 F £ 

£ 3 WILLI/M TELL OVERT. £ 5.00 F £ 

£ 3 MXKIMGBIED £ 5.00 F £ 

£ 3 STING & MAPLE RAG £10.00 F [ 

£ 3 BACH'S BOUREE IN C £ 5.00 F £ 

£ 3 CHESS 'BRUCE* £17.95 MG £ 

[ 3 GRAPHICS PACK I £25.95 BMU £ 

£ 3 GRAPHICS PACK II £25.95 BMU [ 

t 3 DISASSEMBLER £17.95 MU £ 

£ 3 CROSS REFERENCE £14.95 MU [ 

£ 3 MUSICAL HCRSERACE £ 7.95 BMGS £ 

£ 3 JAIL BREAKOUT £ 7.95 MGS [ 

£ 3 EDITOR EUR BASIC £10.00 MU £ 

£ 3 QUICK EDIT £10.00 MU £ 

£ 3 MILITARY ENCOUNTER £14.95 BM3 £ 

t 3 2716 EPRCM BURNER £49.95 MLH [ 

[ 3 DOUBLE PCRT BOARD £ 7.95 H £ 

£ 3 DOUBLE PCRT OCMPLETE£24.95 H £ 

£ 3 CHARACTER GENERATOR £10.00 BU [ 

£ 3 GALAXIANS £19.95 M3SJ £ 

t 3 SPACE INVADERS £17.95 BMGSJ 

£ 3 SCRCERY BREWS £16.95 (+£5.00 

(BREWS IS SHSIT 4TH CLASS POSTAGE, ADD 


SORCERER SIZE»> 16K 32K 48K 

RETURN ADDRESS: 


3 CHUMP £19.95 M3SJ 

3 JUKEBOX COMPLETE £40.00 MLEFHS 
3 JUKEBOX (no board) £21.95 MUEFS 

3 ARTILLERY £10.00 BM3 

3 CUBES £10.00 MG 

3 DATABASE SYS II £29.95 MU 

3 M.C3CDE TUTORIAL £25.95 ME 

3 SCREEN GENIE £14.95 BMU 

3 CASSETTE FILES £14.95 MU 

3 SPACETREK 32K £14.95 BGS 

3 BLACKJACK £ 7.95 BG 

3 QUBIC £ 7.95 BG 

3 OTHELLO £ 7.95 MG 

3 CCNCENTRATICN £ 7.95 BG 

3 CIRCUS £17.95 MGSJ 

3 MISSILE DEFENSE £17.95 MGJ 

3 SUPERX EDITOR £21.95 MU 

] DYBUG TOOL £14.95 MU 

3 SCREEN SYSTEM £25.95 MU 

3 JOYSTICK PAIR £39.95 (+£6.00 

OVERSEAS POSTAGE) 

OVERSEAS POSTAGE) 

£3.00 FOR FIRST CLASS) 




CHOMP I GRAPHICS I I GRAPHICS I 



MISSILE DEFENSE INVADERS GRAPHIC II 
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GALAXIANS 


2?2» HIGH SCOPE 


CREDITS ' 


SORCERY BREWS 




KP AD POSE £v 


This manual is a treasury of programming tricks that are 
specific to the Exidy Sorcerer computer, although much is 
applicable to other microcomputers that employ either Microsoft 
Basic or a Z80 microprocessor. With this ready reference of 
valuable examples at your fingertips, your programming efforts 
will be greatly simplified, and your programs will be more 
professional in both appearance and performance. Using this 
manual will unleash the hidden powers of your Sorcerer. You 
will graduate from being an apprentice to being a full wizard 
as you study and use the brews concocted by masters of the 
Sorcerer. 
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SERIAL PORT REVISIONS 

by Bryan Lewis 


The Sorcerer I RS232 serial port 
has caused many a headache to its 
owner. Let's look at why and what 
can be done to solve its problems. 

The Sorcerer gets double duty out 
of its single UART chip. Through 
some auxiliary circuitry, the UART 
output is either amplified to 12 volts 
as required for RS232 interfacing, or 
else, left at 5 volts for cassette 
operation. (There is probably more to 
it than that. I'm not a hardware 
whiz. Anyway, there are two modes the 
serial port can operate in). The 
choice of mode is made by port FE's 
high bit, which is nice since you can 
change it from software. Executing 
OUT FE,80 (all in hex) sets RS232 
mode. OUT FE,0 sets cassette mode. 
(The other bits on the port specify 
baud rate, etc.). Unfortunately, the 
writer of the Exidy Monitor software 
erred. Every time he accessed the key¬ 
board (which is also on port FE -- 
another instance of double duty), he 
inadvertently cleared the high bit. So 
the port goes back to cassette mode; 
not good if you're driving a serial 
printer. 

To fix it, you can find the circuit in 
the Sorcerer I chassis that corresponds 
to that selector bit. That's chip 8B-9. 
(Look at the Technical Manual sche¬ 
matics, if you have them). You can 
that high (run a wire to +5 volts), 
or route a wire through a switch first 


if you want to be able to return to 
cassette opetation at some time (you 
probably do). Even better, install the 
following simple modification, in¬ 
vented by Berney Zawrotny and me. 
(see diagram below). 

Just one trace to cut, one wire to 
ground, and one resistor to +5 volts. 
This makes the selector bit depend on 
the state of the cassette motor 
transistors. When the Monitor wants 
to initiate cassette operation, it turns 
on the cassette motor and the serial 
port is automatically put into cas¬ 
sette mode. At all other times the 
port stays in RS232 mode. No manual 
switches to worry about. Clever, eh? 

Second way to fix the bug...modify 
the Monitor keyboard routine so that 
it remembers to put the selector bit 
back where it found it. That's what 
the new Exidv ROM's do for you. By 
the way, that's how other serial-port- 
related software operates, such as the 
Smart Terminal program. It includes 
its own keyboard routine, a copy of 
the one in the Monitor except that 
the serial port status is preserved. 

Refer to the diagram for the 
modifications to the Sorcerer I serial 
interface to automatically select cas¬ 
sette mode when needed, and to stay 
in RS232 mode otherwise. Changes are 

P ointed out and drawn in dotted 
ines. 


Old method: Bit 7 of port FE (1C- 
2) was connected to the serial input 
and output circuits 8B ad 10F. That 
bit selected the mode: high --> 
RS232, low --> cassette. The cassette 
motor transistor had nothing to do 
with mode, but it was turned on by 
the Monitor sftware during cassette 
mode. 

New method: Bit 7 of port FE is 
unused. The motor transistor, when 
on, connects the serial circuits 8B ad 
10F to ground. (Low --> cassette 
mode). At all other times, the signal 
is held at +5V, so the default mode 
of operation is RS232. 

If dual cassettes are used, just 
duplicate the changes. Both transistors 
will be connected to the same point - 
in parallel. If either cassette is used, 
the selection signal will be pulled 
low, as desired. 

There is one case I know of where 
this doesn't work. The Scott Adams 
Adventures contain their own cassette 
routines for saving games. They don't 
call the Monitor's routines, and the 
motor transistor never gets turned 
on; the interface (with above mod's 
made) stays in RS232 mode. If this is 
a problem for you, then you'll have 
to add die manual toggle switch. 

If you have any questions - drop 
me a line c/o Sorcerer's Apprentice. 



SORCERER S APPRENTICE, January 15 > 1982 


15 






Harry L. S. Jones of Houston, Texas, informs us that Vista disk systems use hard 
10 sector diskettes instead of soft-sector as reported on page 155 of SA Vol. 3, 
No. 8. He is a dealer for a number of S-100 manufacturers as well as Vista. He is 
offering a 15% discount to Sorcerer Apprentice members. His address is: 5802B 
Qarewood, Houston Texas, 77081. 

There are a number of people interested in software dealing with amateur radio 
and electrical engineering. If you know of the existence of such software, please 
let us know so we can pass this information along. 

Bartlett Enterprises, 1277 Airport Boulevard, San Jose, CA 95110, (408)295-5868 
is an Exidy dealer. 

In response to a reader request for the models of tape recorders which work well 
with the Sorcerer, here is what Steven Smouse of Texas replies: 

Sony TC-62 (about $42.00) CSAVES Si CLOADS 95% of the time with software 
recorded from the Exidy. Will work only about 50% of the time with purchased 
software. 

Sounuesign #7636 gives excellent result 98% of the time. CLOAD's 80% of 
purchased software on the first tty, 100% for the second or third try. (about 
$46.00). Tapes have a lot to do with the quality of recording and playback. Do not 
use the long playing tapes - they are wound very tight and cause a lot of 
problems. C-60 should be the longest playing tape you use. Steven recommends 
Radio Shack low noise, high output tapes in the red or purple packages ($1.59 to 
$2.59). 

David Cooke of SAT TRAK Int'l, Treasure Island, Route 1, Box 18, Kingston, ON 
Canada K7l 4V1 informs us that any member who has an old version of TRAK 
(Satellite tracking software, now exclusively distributed by Quality Software of 
Reseda, CA) can obtain an update for $2.00 if you'll send the old tape back to him 
at the above address. 

Does anyone have a disassembled listing of Exidy's disk BIOS? What software 
mod's are necessary to read double sided disks with Exidy's SS controller card? Is 
it possible to write a BIOS that would allow the SS disk (77 track) to read/write 
to the Micropolis MOD II hard sector disks (77 track)? Does anyone know how to 
enable EBASIC to read sequential ASCII files without recognizing the comma as a 
delimiter? Ca the Sorcerer run at 4MHZ by replacing the Z80 with a Z-80A? 

Trelen Wilson of 2826 Rutland Ave., Des Moines, IA 50311 would like to find 
Sorcerer owners in his area. 

Has anyone tried the 'Last Memory' RAM board? A member in Valley Forge, PA 
is having difficulties with his and would like to talk to others who have used this 
particular memory board to see if a fix can be found. 

Another member reports that the Panasonic Slimline recorder is very good. 
Doesn't have motor control, but it works at 300 and 1200 baud without a problem. 

A. S. Marl and of Paris, France reports a bug in Roth's Z-80 Relocator, at 
location 504E '0C' should be changed to '03'. The new Monitor 1.1 ROM's from 
Exidy have a bug in the TEst program. OK still means there is a zero' at the 
indicated bit location, while BAD still means there is a one. No indication of what 
the bits ought to have been. Put another way, the bad address is compared with 00 
during printout, even though it was compared to something else when the fault was 
actually detected. POP BC (to recover B), PUSH BC (to put C back on stack) needs 
to be inserted between E963 and E964. 


******************************* 
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SORCERER'S APPRENTICE 
P.O. Box 33 

Madison Heights, MI 48071 
!!! JOIN NOW !!! 

To become a 1982 member of the Sorcerer's Apprentice User's 
Group and receive Vol. IV of the SORCERER'S 
APPRENTICE Newsletter, return this completed application 
along with payment. 

NAME: 

Title: Mr. Miss Mrs. Ms Dr. or_ 

First name: ___ 

Middle initial: ___ 

Last name:__ 

Business Name (if a business): 


ADDRESS: 

Number, Street and Apt. No. 


PERSONAL: 

Age: _ _ __ 

Occupation: ___ 

How do you rate yourself as a computerist? 

>HARD WARE: Beginner Intermediate Expert 

> SOFTWARE: Beginner Intermediate Expert 

Is your interest: 

Hardware Software Both 
Is your application: 

Business Personal Both 

Use a separate sheet of paper, if you don't have enough 
room to comment below. 

PLEASE USE SEPARATE PAPER FOR TOUR QUESTIONS. 

EXIDY: 

If you have had any dealings with Exidy 
Systems, describe their nature and outcome: 


City: _ __ 

State or Province: __ 

Zip/Postal code: ___ 

Country: __ 

PHONE: 

Home: (_)__ 

Business: (_)__ 

If you do NOT wish the above released, sign here: 
NETWORKS: 

Source ID: __ 

MicroNET ID: _ 

The following information will be held in confidence: 

Which of the following do you have? 

(circle where applicable): 

SORCERER: 

Number of units (if more than one): _ 

Model: I or II 

RAM memory: 8K 16K 32K 48K >48K 

EXPANSION: 

Exidy S-100 Expansion Unit: Yes No 

Other expansion unit: _ 

Exidy expansion cable: Yes No 

Cards used in expansion unit: 


FEEDBACK: 

What types of software interest you most? 


List the columns or articles you like the most. 


List the columns or articles you like the least. 


What topics/articles would you most like covered? 


What comments have you about the Newsletter? 


BACK ISSUES: 

ARESCO Source (issues 1-5) @ $8: $ 

fl iM iN i V e limwII q $ tJAi 

B r jnjem'j Appruitic c " V e l I .(! ■■ ¥) q $ 10: $ NA 

Sorcerer's Apprentice Vol II (1-5) $10: $_ 

Sorcerer's Apprentice Vol III (1-8) @ $12: $_ 

Sorcerer's Apprentice Vol I-III ({J $2 per issue: $_ 

Overseas orders add $1 /issue or $4/Vol: $_ 


1982 MEMBERSHIP - VOLUME IV: 

U.S.A. - Third Class postage @ $18: $_ 

U.SA. - First Class (in an envelope) ^ $24: $. 

Canada & Mexico - First Class @ $24: $. 

All others - Airmail @ $32: $. 

Single issue - USA, Canada & Mexico U $3: $. 

- All others airmail U $4: $. 


TOTAL $. 


PRINTER: 

Type: 

DISK SYSTEM: 

Type: 

CP/Mx 


Exidy 1.4 
Lifeboat 1.4 

Other DOS: _ 

BASIC: _ 


2.2 

Mentzer 


2.2 


MODEM: 

Type: 

PERIPHERALS: 


Make checks or money orders (only in US funds drawn on 
e US bank) payable to: SORCERER'S APPRENTICE. 




SERIAL I/O DRIVER USING 
SINGLE BITS CF THE PARALLEL I/O POTT 

by Walt Hendrickson, 2313 W. 181st St., Torrance CA 90504 


0100 

0100 

0100 

0100 

0100 

0100 

0100 

0100 

0100 

0100 

0100 

0100 

0100 

0100 

0100 


0010 •.-..* 

0020 * SORCERER READ At*) PRINT ROUTINE * 

0030 * USING 1 BIT CF THE PARALLEL I/O • 

0040 • PCRTS. 1/30/81 W. HENDRICKSON * 

0050 * BALD RATE CONSTANTS ARE: * 

0070 * BALD RATE CONSTANT * 

0080 • 110-0B6H * 

0090 * 300 42H • 

0100 * 500 28H * 

0110 * 600 20H ♦ 

0120 * 1200 38H ♦ 

0130 * 2400 —.- 19H * 

0140 * 4800 09H * 

0150 * # = ALTERNATE DELAY CIRCUIT ♦ 

nun t * 





0100 


0180 *- 

READ AND ECHD ROUTINE.* 

0100 C5 


0200 FDPK: 

PUSH B 

WE USE THESE 

0101 D5 


0210 

PUSH D 


0102 DB FF 


0220 HDPK1: 

IN 0FEH 

GET INPUT BIT 

0104 OF 


0230 

RRC • 

PUT INTO CARRY 

0105 DA 02 

01 

0240 

JC FDPK1 

NO START BIT YET 

0108 CD 5D 01 

0250 

CALL HALF 

DELAY 1/2 BIT TIME 

010B 3E 00 


0260 

MV I A,0 

ECHO START 

010D D3 FF 


0270 

CUT 0FFH 


010F 16 80 


0280 

MVI D,80H 

SET FLAG BIT 

0111 CD 5A 

01 

0290 RDPK2: 

CALL VHCLE 

DELAY 1 BIT TIME 

0114 DB FF 


0300 

IN 0FFH 

SAMPLE INPUT 

0116 E6 01 


0310 

ANI 01H 

MASK FCR BIT 1 

0118 D3 FF 


0320 

CUT 0FEH 

ECHD 

011A IF 


0330 

RAR 


011B 7A 


0340 

MCV A,D 

GET DATA 

011C IF 


0350 

RAR * 

ROTATE FCR NEXT BIT 

011D 57 


0360 

MDV D,A 

SAVE NEW PATTERN 

01IE D2 11 

01 

0370 

JNC RDPK2 

LOOP FCR 8 BITS 

0121 CD 5A 

01 

0380 THE E© 

CALL VHCLE 

LAST BIT 

0124 3E 01 


0390 

MVI A,01H 

SET STOP BIT 

0126 D3 FF 


0400 

OUT 0FFH 


0128 CD 5A 

01 

0410 

CALL VHCLE 

SB© 1 STOP 

012B 7A 


0420 

MDV A,D 

DATA TO RBGISTER A 

012C D1 


0430 

POP D 


012D Cl 


0440 

POP B 


012E C9 


0450 

RET • 

ASCII DATA IN REG A 

012F 


0470 *-SEND ASCII DATA IN RBGISTER A-* 

012F C5 


0490 PRINT: 

PUSH B 

WE USE THESE 

0130 D5 


0500 

PUSH.D 


0131 F5 


0510 

PUSH PSW 


0132 57 


0520 

MD/ D,A 

SAVE DATA IN D 

0133 3E 00 


0530 

MVI A,0 


0135 D3 FF 


0540 

CUT 0FFH 

SEND START BIT 

0137 0E 08 


0550 

MVI C,8 

BIT CDLNIER 

0139 CD 5A 

01 

0560 PRINT1: 

CALL VHCLE 

WAIT 1 BIT TIME 

013C 3E 01 


0570 

MVI A,01H 


013E A2 


0580 

ANA D 

MASK DATA 

013F D3 FF 


0590 

OUT 0FEH 

SEND DATA BIT 

0141 IF 


0600 

RAR 


0142 7A 


0610 

MDV A,D 

GET NEXT BIT READY 

0143 IF 


0620 

RAR 


0144 57 


0630 

MDV D,A 

SAVE NEW DATA 

0145 0D 


0640 

DCR C 

DECREMENT COUNTER 

0146 C2 39 

01 

0650 

JNZ PRINT1 

LOOP FCR 8 BITS 

0149 CD 5A 01 

0660 

CALL VHCLE 


014C 3E 01 


0670 

MVI A,01 


014E D3 FF 


0680 

OUT 0FEH 

STOP BIT 

0150 CD 57 

01 

0690 

CALL TWCBIT 

SEND 2 STOPS 

0153 FI 


0700 

POP PSW 


0154 D1 


0710 

POP D 


0155 Cl 


0720 

PCX* B 


0156 C9 


0730 

RET * 

DONE 1 

0157 



TMJT AV DTirTTMC _ _* 


U/7U —————— 



0157 CD 5A 

01 

0770 TWCBIT: 

CALL VHCLE 


015A CD 5D 01 

0780 VHCLE: 

CALL HALF 


015D 06 42 


0790 HALF: 

MVI B.BALD RATE BALD RATE CONSTANT 

015F E3 


0800 DELAY: 

XIHL 


0160 E3 


0810 

XIHL 


0161 05 


0820 

DCR B 



0162 C2 5F 01 0830 INK DELAY 

0165 C9 0840 RET 


0166 


0860 BALDRATE 

EQJ 42H 

SYNB 2 
FDPK 

0100 

: HDPK1 

0102 

: FDPK2 

0111 

THEEND 

0121 

: PRINT 

012F 

: PRINT1 

0139 

TWCBIT 

0157 

; VHCLE 

015A 

: HALF 

015D 

DELAY 

015F 

: BALDRATE 

0042 




DUST MOTES 
from the System 

The Quality Software Smart Ter¬ 
minal is NOT capable of downloading 
OBJ files. OBJ files are machine 
executable code from CP/M.COM files 
of the same name. As such they 
contain bytes having values greater 
than 7F hex. The Smart Terminal 
program strips the high bit from each 
received byte reducing each to a 
value of 7F or less. 

IF YOU ARE A CP/M OPERATOR, 
download MBOOT3.ASM and assemble 
it for your system. Then use it to 
get MODEMxxx.ASM. Assemble the 
Modem program and use it to pick up 
PLINKJVSM and SETMODEMJVSM/ - 
SETTAPEASM if you need them. 
Setmodem and Sett ape are used with 
serial modems as port initializing 
routines. Modem and Plink are now 
your communications programs (you 
no longer need Smart Terminal). IF 
YOU DO NOT HAVE CP/M, most OBJ 
files will be of no use to you as 
most need CP/M to run. 

I have repeatedly been asked: "Are 
you really using a Sorcerer for the 
remote CP/M system?”. Yes, a Sor¬ 
cerer is really being used. 

Hardware: Sorcerer II, S-100 Ex¬ 

pansion Chit, Micropolis Mod. II. 

PNMI Modem, 4K RAM Board, Special 
S-100 EPRCM board, Leedex 12” 
video monitor. 

Software: CP/M 2.21 , B6VHBYE 

(adapted to IPRCM), CHAT Ver. 1.51 
(a sligntly modified 1.5), H5LP ^ 

(edited for this system), MLIST (( 1 

Ver. 5.0 (used as TYPE), SD VI / 

Version not reporting sizes, used 

as DIR), SD (version reporting 
sizes, us ed as SD), 1ACDIM Ver. 

4.2, NBRRAU) BYE (a jimp routine 
to PM4IBYE in EPRCM), MINICBBS (a 
custom prog ran written for Keith 
Petersen by Ward Chr ist ensen.The 
program is only to those who have 
purchased CBBS from Ward Chris¬ 
tensen) . 



All software, except CP/M, BYE, 
and MINICBBS can be had by 
downloading from one of the large 
RCPM systems. Try Technical CBBS 
at (313) 846-6127. 


BasicE consists of not one but two 
different programs. BasicE is the 
compiler module and RunE is the 
runtime interpreter. BasicE expects to 
be loaded with the commandline; 
BASICE FILENAME, where the filetype 
is BAS. BasicE then creates FILE- 
NAME.INT. RunE will load with the 
commandline; RUNE FILENAME, where 
the filetype is INT. These programs 
do not accept input from the console 
except during a program run that 
calls for such input (you don't type 
the programs in via the console). 


We have the complete set of the 
newest versions on the B: . Do¬ 
cumentation is available from: 

Computermart of New Jersey 
501 Route 27 
Iselin, NJ 08830 

The price is #5.50 plus shipping 
(about #1.00). <> 
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SAVING STRING ARRAYS IN EXTENDED CASSETTE BASIC 


by R.L. Henne 


I have had Exidy's Extended Cassette 
BASIC (EXCAS) up and running for 
several months now, and found it to be a 
most capable language. However, like the 
ROMPAC BASIC, EXCAS lias no 
CSAVE*/CLOAD* capability for string 
arrays. [This is because string arrays do 
not occupy .contiguous memory lo¬ 
cations.] This deficiency is somewhat 
easier to overcome in EXCAS than in 
ROMPAC BASIC due to the presence of 
integer arrays and the VARPTR 
function. 

The EXCAS manual contains a 
program for CSAVE*/CLOAD* of string 
arrays which packs three characters per 
4-byte single-precision floating-point 
word, for 75% efficiency. The following 
program packs two characters per two- 
byte integer word, providing the speediest 
I/O possible under the circumstances. 
More importantly, though, it gives SA 
readers a chance to see some of the 
features of EXCAS in action. 

First, you will notice that the 
apostrophe will suffice for REM, making 
comments much more readable. The use of 
"%" after a variable or array name 
defines it as an integer. EXCAS also has 
single- and double-precis ion floating¬ 
point types. The OPTION BASE 1 
statement in line 1000 allows array 
subscripts to start with 1 instead of 0. (A 
victory for the mathematicians over us 
computer scientist types.) 

Note also the ease with which loops 
may be indented for easier reading 
without the need for colons. The ERASE 
command in line 5050 deletes obsolete 
arrays* which may th$n be re- 
dimensioned. Critical to this program is 
the VARPTR command, which gives the 
address in memory of a variable. 

Other features of EXCAS which provide 
interesting capabilities include: 

Hex and Octal constants and functions, 
Error trapping and simulation, Editing 
within procram lines, Call and 
expanded UsR functions for access to 
machine language, CLEAR with the 
capability to set aside memory for 
machine language subroutines, CLOAD? 
for verification of CSAVEs, CURSOR 
addressing, plus LINEINPUT, IF/THEN 
with ELSE: WHILE/WEND, PRINT 
USING, RENUM, Program tracing 
(TROlsf/TROFF), and lots of other 
goodies! 

One last point of interest - since my 
printer requires a special software driver, 
it looked as though I would be unable to 
take advantage of EXCAS's special 
LPRINT and LLIST capabilities (which 
use the Monitor's Centronics driver or a 
serial driver in EXCAS) without a 
hardware mod. A bit of detective work led 
me to find the following code at location 
1FC4: 

1FC4: F5 C3 97 E9 

This code saves the AF register-pair 
and jumps to location E997 in the 
Centronics driver. [The F5 or PUSH AF 
takes the place of the one at E993, which 
is followed by a CALL VIDEO, which 
EXCAS is skipping around.] Therefore, 
if a special printer driver is required, 
change the jump address in locations 
1FC6-7 to point to it, and make sure it 
does a POP AF before returning. 

As far as I can tell at this point, there 
is space at 4BC0 for later patches to 
EXCAS. I put my driver in this area, made 
the change at 1FC6-7, and re-saved 
EXCAS. Now, when I >LOG EXCAS, my 
pointer is ready for immediate use, 
without having to load the driver 
separately! (I originally tried 4B50, and 
discovered the hard way that the input 
buffer took that space on long program 
lines!) 

Happy Programming!! 


PROGRAM LISTING: 

98 i****************************************************** 

99 ' 

100 ' This program dempnstrates a way to CSAVE*/CLOAD* 

110 a string array indirectly by packing two bytes 

120 1 (characters) into each element of an integer array. 
130 ' 

140 ' The A# array contains 30 elements of 10 characters. 
150 The B% array is the integer array containing 5 
160 1 integers per element of A#. 

170 ' (If any element of A# is longer than 10 characters, 
180 ' it will be truncated. Longer A# strings would 
190 ' require enlarging the dimensions of B% and the 
200 ' loop indices.) 

210 ' 

220 : 

500 ; 

900 Lines 1000 - 1200 decide whether we'll read or write 
910 ' 

1000 CPTICN BASE 1 'Start arrays at 1 for simplification 
1100 INPUT"READ OR WRITE (R/W)":C# 

1200 IF LEFT#(C#, 1 )="R" THIN 80<$0 
1250 ' 


1300 

1500 

1520 

1530 

2000 

2015 

2020 

3000 

3100 

3200 

3300 

3400 

3500 

3600 

3700 

4000 

4010 

4015 

4016 

4017 
4020 
4030 
4040 
4050 
5000 
5025 
5050 
5100 
5500 
5510 
5520 
6000 
6010 
6020 
6030 
6040 
6050 
6075 

6999 

7000 
7010 
7020 
7040 
8000 
8025 
8030 
8040 

8050 

8051 

8052 

8053 
8100 
8150 
8200 
8600 
8650 
8700 
8800 
8802 
8805 
8810 
8820 
9000 
9999 


WRITE TEST - First fill the array A# 


I%):NEXT 1% 


DIM A#(30),B%(30,5) 

FOR I%=1 TO 30:READ.. 

PRINT "A# IS INITIALI 

' Lines 4000 - 5000 convert the string array A# 

' to the integer array B%, and save it with the 

' CSAVE* ccranand. Line 5050 erases the arrays 

' so we know that the RE&) is really READing! 

I%f0 : J%fJ%:B#="":C#=B# 'You must not define any new 
PCKADR%=VARPTR(B%( 1,1)) ' variables after calling VARPTR 
FCR I%Fl TO 30 
FCR HEfI TO 10 
B|=A#(I%) 

QN3!d|(B#, J%.1):IF C#="" THEN C#=" " 

PCKE P^ADR%lASC(C#) 

PCKAm%FPCKADR%+l 
NEXT J% 

NEXT 1% 

PRINT "A# TO B% GCNVERSICN IS COMPLETE" 

CSAVE* 1 B% 

PRINT "B% ARRAY HAS BEEN WRITTEN TO TAPE" 

ERASE A#,B% 

£TOP 

' v Lines 6000 - 6040 contain data for A# 

DATA HELLO.GCXDBYE ,WTB4 .NEVER .TODAY 
DATA TOCR&IV,YESTfiREJAY!TOO,Lfer,GIVE 
DATA WEREJTHERE.ONE,HERE,QUIT 
DATA STOP. (56, LEA^E, STAy.HECF 
EATA I ANt&RY. FEBRUARY. MARCH. APRIL.MAY 
DATA JLNE, JULy,ALX3JST,SEPTOBER .OCKBER 


READ TEST - First dimension the new arrays A# and B% 
and read in the B% array from the tape 


'You must not define any new 
' variables after calling VARPTR 


DIM A#(30),B%(30,5) 

I%=0:T%=I% 

PEEKADR%=VARPTR(B%( 1,1)) 

CLOAD* 1 B% 

PRINT "B% ARRAY HAS BEEN READ FRCM TAPE" 

J Lines 8100 - 8800 convert the B% array to the A# array 

FCR 1%=1 TO 30 
A#(I%)="" 

FOR T%=1 TO 10 

A#tl%)=A#(I%)+CHR# (PEEK(PEEKADR%)) 

PEEK^%fPEEKADR^1 
NEXT J% 

NEXT 1% 

PRINT "B% TO A# GCNVERSICN IS GCMPLEIE":PRINT 

' Line 9000 prints out the restored array. 

FCR I%=1 TO 30 STEP 2:PRINT A#(I%),A#(I%+1):NEXT 1% 

EhD 
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RESTORING DELETED WORD-PRO-PAC TEXTS 
by Jim Cooper, Box 73, Paramus, N.J. 07652 

Always start your text with at least two carriage returns. This way, if you 
delete the text for some reason and then want to restore it, you need only do the 
following: 

A. Use X command to enter the Monitor 

B. DUmp 800 900 

C. Use ENter command to change data at locations 80F thru 81E as 
follows: 

AEDR: 0123 4567 89AB CDEF 

800: 0D 

810: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 0D/ 

D. Return to WURD-PRO with the PP c cam and, and you should be in the EDIT 
mode with the original text showing in full. Only difference will be that 
one of the first few lines will be filled with spaces and a carriage 
return. 


SAVING WORD-PRO-PAC TEXT ON MICROPOLIS MDOS DISKS 
by Jim Cooper 


It is difficult to save WORD PROCESSOR text on CP/M disks because of CP/M 
saves memory only from 0100H up (with no indicated way of changing that). 
Also, the CP/M OS conflicts with memory used by the WORD PROCESSOR PAC. 
MDOS also conflicts with memory used by WORD PROCESSOR, but allows text to 
be moved and saved in free memory space. 


TO SAVE TEXT ON DISK -- 

1. Enter text for WPF b-e-f-o-r-e booting MDOS. 

2. Use X command to enter Monitor. 

3. Use DUmp 800 FFFF and watch for end of WPF text (identified by at least 
one string of 03 followed by 15 0E, then blank memory - ie: 00 FF 00 FF, etc.) 

4. Determine memory location of end of text. (If greater than cannot be saved by 
this procedure). Let ABCD=Top of file address. 

5. Use MOve 0 ABCD 4000 to move WPF into upper memory. 

6. Now, boot the MDOS system. 

7. In MDOS, save text as follows -- 

SAVE ”Unit :XXXXX/ABCD" 4000 DBCD 0 

where XXXXX=Filename (5 Char, or less) 

ABCD =Hex address of end of ori^. WPF text 

DBCD =4000H + ABCD (you add in hexadecimal values) 

Using /ABCD as part of the file name will help when loading the file bade at 
a later time. 

8. Use FILES command to confirm that the program was added to the disk 
directory. 


TO LOAD WORD PROCESSOR FILE FROM MDOS DISK — 
by Jim Cooper 

1. Power up Sorcerer with WPF PAC inserted. 

2. Use X command to enter Monitor. 

3. Boot MDOS. 

4. Type LOAD "XXXXX/ABCD" 4000 

5. Still in MDOS, type EXEC E003 

This will set you back to Monitor with warm-start (no memory changes). 

6. In Monitor, type MOve 4000 DBCD 0 

This must be done in Monitor, not in MDOS command, as the WPF text will 
overlay parts of MDOS and destroy the MDOS system. WPF text has now been 
moved into place for WPF PAC. 

7. Type, GO C003 

This sets you into edit mode of the WPF with a warm start, and your text 
should appear on the screen. ... 

8. Go to WPF COMMAND mode, type E, and check that all of your text is really 
present. Command T will set you back to the top of your text and you can 
continue as if you started in WPF mode. <> 


One of the real BIGGIES is the 
#ST command. It will show you the 
STATUS of the edit buffer, by 
displaying the following addresses: 
START OF TEXT, END OF TEXT. 
TOP OF THE EDIT BUFFER, LINE 

POINTER and how many bytes are 
free in the edit buffer. Now you can 
use the MONITOR’S SAve command to 
write your source file to tape. Use the 
START and END addresses shown by 
the #ST command. Finally your 

source code files will have labels and 
can be more quickly saved and 

reloaded. The #SA command will 

f ermit you to save any number of 
ines of .your source file, from the 
current line pointer position to the 
end of file, or other end address you 
specify, using the standard MONITOR 
format, with a label name of your 
choosing. This one is ideal for 
saving a sub-routine for use in other 
programs. You could then merge it 
into another program with the #LO 
command. This command will load, by 
filename, a MONITOR file into your 
current source file, starting at the 
line number you specify. It will 
insert the new file without overlaying 
any of your existing source text. It 
you start to run out of room in your 
edit buffer, the #SQ command can 
save the day. It will compress all but 
essential spaces from the source file. 
This can amount to a 33% savings! 
The last commands permit you to 
rapidly jump to other modules, 
automatically changing the I/O vec¬ 
tors. #DD takes you to the DDT 
mode, #MO exits you to the 

MONITOR (where you can return to 
the EDITOR by typing #ED). #AS 
also puts you in the DDT mode, but 
first sets up the vectors for 
assembling source code. You would 
then enter the normal assembler 
command E -AS to begin the 
assembly. There are also three 
commands for controlling the display. 
#PR will PRINT all displays to a 
RS-232 printer at 300 baud, using a 
built-in driver. If you have a 

CENTRONICS compatible printer, you 
can patch this command to the 
MONITOR'S drivers (the book tells 
you how!). #PV will display every¬ 
thing on the video screen at 1200 
baud. And finally the #PH command 
activates the PRINT HALT capability. 
This works with either the #PR or 
#PV mode of display. Whenever 
anything is printing on either the 
printer or the video screen, you can 
pause the listing by pressing any key 
once. Pressing any key a second time 
will. resume the listing. If after 
pausing a listing, you press the 
ESCAPE key, you will immediately 
exit to the MONITOR. By issuing the 
#PV command, you can effectively 
disable the print halt option. 

Since all the I/O vectors are 
automatically set for you by the #ED 
and #AS commands, you will not 
ordinarily have to manually set 
anything whenever you use the RAM 
buffers for development work. If 
however you need to use tape drive(s) 
for assembling VERY large files, or 
for generating LINK EDIT modules, 
then all you have to do just before 
you execute the assembler, is use the 
DDT vector set command to alter any 
of the vectors already set, to the ones 
you need or prefer. If after using 
these NuN-STANDARD vectors, you 
find a need to return to the RAM 
buffer settings, then the command 
#RA, will do it for you auto¬ 
matically. 

Starting with the next issue, I will 
attempt to systematically describe the 
various components that make up the 
Z80 assembly language. If you have 
any particular questions or comments 
regarding this column, the PAC. or 
assembly language in general, please 
write the editor of this newsletter or 
leave me a note on our RCPM/CBBS. 
I'll try to answer your questions thru 
the newsletter or thru the CBBS 
whichever you prefer. <> 
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EXIDY 56K 


Just plug in out new RAMPAC and a 48K Exidy Sorceret becomes a 56K Super 
Machine. The disk user can now run other languages such as COBOL and 
PASCAL. Larger business software can also be executed. 

Special introductory offer: £159.95 including pftp 
*********** 

WOULD YOU LIKE ABOUT 50% MORE SPACE FOR YOUR BASIC PROGRAMS? 

WOULD YOU LIKE TO UTILIZE THOSE MEMORY HUNGRY LANGUAGES? 

Now, with the WESTON EXMEM, you can increase your memory size from 32K 
to 48K. This revolutionary board tits inside the Exidy case. The cost for a fully 
assembled and tested 8K expansion memory unit is £115.00 plus £5.00 for 
postage. 


Easy to follow full - fitting instructions axe included. 


««< CUSTOM CHARACTER SETS »»> 


Allows an alternative set of characters for special duplications. The extra set is 
switch selectable. There are several sets already available. Each set consists of 
96 characters. 


British 

French 

German 

Math/Greek 

Legal 


This includes the pound sign 

The Franc sign, and the three French accents 

All the German character set 

All the math symbols and full Greek alphabet 

This includes Copyright and Registered notices 


These sets are designed to work with standard Daisy printwheels. The user 
is provided with the original character set and one alternative set. 


Custom character sets can be made upon request at a charge of £1.80 per 
character. 


Fitting is easy and requires NO soldering. 

The price is only £41.49 plus £4.00 for Airmail postage and packing. Also 
available for the Apple, Pet, and Tandy. Please specify which character set 
is required when ordering. 

All prices are in U.S. dollars. (Exidy is a trademark of Exidy Systems. 
Inc.; Apple is a trademark of Apple, Inc.; Pet is a trademark of 
Commodore). 

Trade inquiries are Welcome - Telephone Dublin 803429 


Send all inquiries and orders to: 


WESTON MICROTECHNOLOGY LIMITED 
WESTON HOUSE 
12 Alam Road 
Monkstown, Co. Dublin 
IRELAND 
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HARDWARE NOTES 
by Russell Frew, Hardware Editor 


Ope of the most frustrating situations you can encounter is to have a perfectly 
working system that suddenly decides not to boot your disk. Strangely enough, the 
next day when you power-up, everything works like a champ. 

Immediately, everyone begins to wonder about power line drop-outs, spikes, bus 
noise and all die other classic causes for intermittent disk failures. Whether you 
have an Expansion Box or not, there is another culprit that you should look at 
after you have eliminated power drop-outs. 

Exidy needed an octal line driver (8 bit wide transceiver) to sit on the bus of the 
Sorcerer I to protect the CPU from bus conflicts outside the main system. This 
activity could come from the Expansion Box or in the case of the Vista drives, the 
disk controller itself. The chip that Exidy selected is rather an odd one. It is a 
DM8304 transceiver. There are 7 of them in the Sorcerer I. Unfortunately their 
reliability over time seems to be rather poor. When they die, they don't always fail 
in a catastrophic manner. Sometimes only one bit fails. To make matters worse, 
frequently this stuck bit can get unstuck as the system warms up or after repeated 
RESETS. This can make troubleshooting extremely difficult. 

If your disk fails to respond to your >GO XXXX command, try dumping the 
bootstrap PROM. For example with a Micropolis drive system using the boot address 
BC00H, you would give the command >DU BC00 BCFF. This will put the contents of 
the PROM on your screen. Compare this with your documentation or better yet, a 
printed copy of the PROM made previously when the system was functioning properly. 
If the address of the dump is not correct then the problem could be one of the two 
8304's that Duffer the address lines in and out of the computer. If the data is off 
in one or more bits then the problem may be in one of the two that sit on the data 
bus. Hopefully one of the first two areas is your problem because the last option is 
more difficult to identify. The last 8304 sits on 8 of the CPU's signal lines. •- 1 

Having done the PROM dump several times to confirm that the same bits stick or 
drop out each time you are faced with one additional problem. If you have an 
Expansion Box you might have guessed that Exidy used the same 8304's on the other 
end of the Expansion Bus cable. Because both chips are drivers it's hard to tell which 
chip is driving the line and which is sinking the current. If you disconnect the 
expansion cable you quickly find that all signals disappear on both ends of the 
system so there is no easy answer there. Assuming that most users don't have the 
digital instruments necessary to carry this search much farther, let's choose the less 
elegant solution. If we have the problem isolated to two IC's, let's go with the 
statistics. The greatest number of failures of 8304's I've encountered have been in 
the computer not the Expansion-Box. Exidy seems to be of the same opinion. The 
gamble then is to replace the suspect 8304 in the computer first. The address IC's 
are located at 3H & 4H; data at 2H; and control signals at 5F. There is an 
additional 8304 located at 1H which buffers the CPU. Unless the system has totally 
crashed, stay away from that IC. 

Carefully unsolder the suspect IC and replace it with a socket. Save yourself a lot 
of trouble and don't skip the socket. Removal of any IC is always difficult and you 
will probably have to reconstruct several traces after you finish. Because half of 
these chips are located under the ROM Pac tray, you most likely will have the main 
logic board out of the chassis. I would recommend that you rebuild these traces on 
the bottom of the logic board with 30 AWG wire wrap wire. It is much easier and 
will result in far less problems. Replace only one IC at a time and then try the 
system. If the problem remains the same, all that's left is the IC in the Expansion 
Box. I hope the odds are with youl 

The 8304 is not an easy chip to buy. I managed to locate it at Advanced 
Computer Products, Santa Ana, CA. Their phone number is (714) 558-8813. There 
are several other sources in Byte magazine. 
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user intervention. In addition, a 
fast forward mode, which is about 
25% faster than read/write speed, 
operates in certain circumst ances. 
For example, if file 2 is asked for 
and it finds that it is in a higher 
numbered file, the unit will enter 
fast forwardmode until it reaches 
the beginning of the tape where 
normal speed is resumed until file 
2 is f ound. 


PASCAL PORT 

by Daniel Conde 

Continuing on the discussion of memory allocation in Pascal, we 
will discuss the proper statements needed to declare and use create 
objects. These objects need to be pointed to by POINTERS, which 
contain addresses, but since Pascal is a strongly typed language, we 
need to direct Pascal as to what sort of object a pointer will point 
to, as foilow s: 


The Word Processor Pac is 
interfaced to the SF using a short 
patch program that loads into low 
RAM (it does not seem to interfere 
with the Exidy print driver that 
also loads into low RAM). The 
patch enables all of the standard 
WP Pac commands to be used and 
makes the SF transparent to the 
usei. The one disadvantage of this 
method is that the full 48K of 
memory cannot be dumped on a 
single wafer because of the way 
the files are stored in 25 6 byte 
blocks with intervening blanks. 
This means only about 30K ca fit 
on a 75 K wafer. A slightly more 
complicated recording procedure, 
described in the SF newsletter 
number 2, shows how to record WP 
files as monitor files so that 
wafers can be used more 
ef f ic len t ly . 


link 

= car; 


c ar 

RE CORD 



passengers: 

integer ; 


car_no : 

integer; 


c ap ac: 

integer; 


next: 

END ; 

link 

N ot ic e that 

the d eel ar at ion 

for 'link' referred to 'car', BEFORE 


'car 1 was even declared. This 'forward' referencing may seem strange, 
but that is the only way pointers are declared in Pascal. The 
RECORD 'car' is rather straightforward, with 3 integer fields and a 
link to the next car. Assuming that we keep only one chain of cars 
around in the program, we need to declare some variables to reference 
them. (Remember, the TYPE declarations simply define objects, and 
do not allocate any). 

VAR 

head_ptr, tmp; link; 


In use, the SF has been 
extremely reliable with only an 
i n 1 i t essim al 1 y small number of 
write errors detected by the verify 
loop (verify error displayed). A 
few parity errors are detected 
while reading, but these are 
usually overcome by cleaning the 
easily accessible head and drive 
spindle, with alcohol. When 
certifying new wafers, cleaning 
should be performed frequently. 

I suppose all this sounds to 
good to be true. Well, there were a 
few intiai problems with faulty 
wafers that were too wide to go in 
the drive mouths due to poor 
plastic welding by the manu¬ 
facturer, as well as a number of 
wafers would not certify 
correctly. It is rare for a wafer to 
fail after certification, although 
apparantly random failures may 
occur with any magnetic media. 
All faulty wafers were replaced 
immediately, without question. 
Also, initially, wafers recorded 
on one drive were not always 
readable on other drives. This was 
apparantly due to the variable 
setup (particularly head align¬ 
ment) of bare drives purchased by 
ASP from EXATRON. Rigorous 
alignment procedures undertaken 
by ASP now mean that any wafer 
may be read by all drives. The 
only mechanical failure was a 
m otor, but again this was rep laced 
w i 11) ou t 
question. 

When considered overall and in 
the light of unreliable cassettes 
ad expensive and more compli¬ 
cated disk systems, the ASP 
Stringy Floppy implementation is 
very fast, simple to use and very 
reliable. Above all the Stringy 
Floppy is a very reasonably priced 
storage alternative that should be 
c o n s icl cr ed by all Sorcerer owners. 


Here, we have actually set aside two pointers to reference the series 
of cars to be created later. The first one to point to the first car, 
and the second one as a handy temporary pointer to move down the 
series of cars to locate a specific one. To create new instances of 
'car', Pascal's built-in function, NEW is required. The NEW function 
takes as its argument a pointer to the new object to be created. In 
the 'C' language ad PL/1, the equivalent function calls would be 
'alloc'. Be sure that you do not call NEW with a pointer that points 
to something you want to save, since it will now point to the new 
object (probably filled with garbage), and your old object is lost 
forever, unless another pointer had saved its value. 

To create a 'head-car', we will have this statement in Pascal: 

n ew ( head_ptr ) ; 

It is a good idea to explicitely initialize the fields in the 'car' 
record to known values: 

head_ptr.passengers; = 0 
head_ptr ,c ar_no : = 0; 

head_ptr .c ap ac : = 0; 

head_ptr .1 ink : = nil; 

Please take note of the last statement. The value 'nil' is a special 
value meant to represent 'nothing', or ground, if you wish. We are 
not allowed to access an object pointed to by 'nil*. Also of note in 
the above statements is the word 'car' is never mentioned. Since 
'head_ptr' is known to point to a 'car', Pascal is able to dedeuce 
where the fields come from. 

Until next time, please think about how successive values of 'car* 
may be linked to the head of the chain by repeated calls to NEW> 

****************************** 

ERRATA: In last month's Bits & Bytes column the following lines 
should be changed: 

LD H L, 0 F E 8 0 H should read: LD HL,0F 080H 

LD D E ,0 FE 81H should read: LD DE,0F081H 

We hope this hasn’t caused anyone a lot of headaches. 

*************************** *** 
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